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Editorial 



GLANCING at last month's editorial, 
I observe nostalgically that the 
spaghetti overdose is now several 
weeks behind me. I am otherwise 
well, thank you. If you were wonder- 
ing where all the snow was this 
winter, it's presently lying ten foot 
deep on the southern alps, but is ex- 
pected here shortly, I understand. 

Back to reality. I hope you all have 
your Marches. Sorry we're late. The 
issue was actually ready a bare six 
days later than usual , but too late for 
the printers to alter their schedules 
for us yet again. It arrives as I write 
this. Bob Harris would like you to 
know that the KLIK utility costs only 
£14.95, and not £14.14.95 as stated,, 
and I will adjure you again not to 
forget the Ossett Show on April 30th 
(enquiries to John and Helen Penn 
on 04203 5970), the classic of the 
Dragon year to many Drag oners. 

This month we have a long CAD 
program for engineering hobbyists 
— in re ply to the constant moan that 
CAD programs usually cost a for- 
tune and need an Apple Mac, and 
reviews of two new games which 
have caused a fair bit of excitement 
already. 
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How to submit articles 

The quality of the material we can publish in 
Dragon User each month will, to a very great ex- 
tent depend on the q uality of the discoveries that 
you can make with your Dragon. The Dragon 
computer was launched on to the market with a 
powerful version of Basic, but with very poor 
documentation. 

Articles which era submitted to Dragon User 
for publication should not be more than 3000 
words long, All submissions should be typed - 
Please leave wide margins and a double space 
between each line. Programs should, whenever 
possible, be computer printed on plain white 
paper and be accompanied by a tape of the 
program. 

We cannot guarantee to return every submit- 
ted article or program, so please keep a copy. If 
you want to have your program returned you m ust 
include a stamped addressed envelope. 



Letters 



This is your chance to air your views — send your tips, compliments and complaints to Letters 

Page, Dragon User, 12-1 3 Little Newport Street, London WC2H 7PP. 



Bad news 
letter 

PLEASE could you help me 
over a problem I am- having 
sorting out . A while ago I read a 
newsletter which was given 
away at the Ossett Show, 
where I went to a Dragon show 
with the club I am in 

While looking round the 
show, I stopped at a stall giving 
away newsletters called News 
from the Dragon, edited by A. 
Read and others, 

After reading the mag I 
wanted to read more of the 
mags like this, so I did as re- 
quested and sent stamps off to 
the value of the postage for 
each mag I wanted. I sent off 
money for about four mags but 
I only received one other mag, 
which to me is a pity because it 
had helpful hints on programs 
and games. 

I have sent off a couple of let- 
ters but have had no reply, Can 
any readers he!p me over this? 

Dennis Gates 
194 Bek Road 
Newton Halt Estate 
Durham DH1 5LH 

HOME-produced magazines 
come and go at a rate which 
makes even trade computer 
magazines look stable. If 
anyone connected with the 
erstwhile News from the 
Dragon Is reading this, 
please get in touch with Mr. 
Gates. 

Small magazines usually 
fold due to exhaustion, pov- 
erty and over-optimism on 
the part of the proprietors, 
rather than an y plot to de- 
prive people of their money 
and stamps, I would advise 
readers never to send away 
for more than one magazine 
at a time* and not to take out 
subscriptions until you know 
the magazine has a track 
record- The only subs 
Dragon User recommends 
are Dragon Update, 68 Micro- 
cosm and the OS -9 Users 
Group; and I personally 
never advise anyone to ex- 
pect miracles, 

Programmer 
wanted 

I AM a comparatively new 
Dragon user. I am hoping to 
use my Dragon 32 to assist me 
in my pricings at work, but I am 



Every month we will be shelling out a game or two 
courtesy of our supplies, to the reader/s 
who send the most interesting or 
entertaining letters. So send 
us your hints and your opinions, EXTRA 
send us your h i -scores and 
suggestions. Send us your 
best Dragon stories. What 
d 'you think we are, 
mind readers?! 




The answer to the 
question of life . - 



not proficient enough to write 
my own programs. 

Do you know of anyone who 
could possibly write a program 
for me (for a financial con- 
sideration, of course)? 



I HAVE owned a Dragon 32 for 
five years. I also have a Dragon 
32 with 64K memory (loaned to 
me by a friend who seems to 
have about five). There seems 
to be a lot of controversy about 
several subjects and, as a 
Dragon enthusiast with a wide 
knowledge of things com- 
puterish, I will try to clarify the 
problems. 

The complaints seem to be 
mostly about 1 ) power supplies 
2) software support 3) 64K 
games 4) imports. 

One at a time, then, 

Power supplies: In all the 5 
years of Dragon ownership my 
machine has NEVER gone 
down. The power supply, 
on/off switqfi, etc all work 
perfectly. Apparently many 
transformers do break down, 
and the replacements are not 
cheap. However, If like me you 
own a Dragon 32 with 64K 
memory, the power supply is 
inadequate. This leads to the 
voltage regulators overheat- 
ing. This leads to the adjacent 
video monitor getting warm. 
This gives unwanted loss of 
colour and even picture (many 
people complain of no colour). 

THE truth is that people who 
run substantial software 
houses are entrepreneurs 
who are trying to make a liv- 
ing, even if they started for 
love. Every time they put ad- 
ministrative effort into a 
shrinking market rather than 
an expanding one, they are 
effctlvely subsidising it out 
of their own pockets. For this 
reason, many companies 
puil out of small markets 
wh i le the m a rket i s still show- 
ing signs of health. 
I don't think it's fair to 



Also, this c re ales aloudhumon 
the audio circuits which is very 
annoying when using music. 
(Anyone encountering these 
problems should phone Harry 
Whitehouse on 0636 705230, 
since he is the power supply 
guru these days. He may 
recommend that you buy one of 
his PSUs, but he won't if he 
thinks it won't do the job. — 
Editor) 

Software support: RIP 

Microdeal. Quickbeam will go 
under if they continue to 
charge high prices. Preston 
software will (hopefully) do 
well. In short, software will be 
written by small companies 
who are mostly exclusive to the 

Dragon. 

The 64K factor is sad, 
Microdeal refused to fund 
Usurper of Rome after it be- 
came too long for a Dragon 32. 
According to them, there is lit- 
tle enough of a Dragon market 
without halving it. But this at- 
titude is taken by all the major 
software houses. 

Imports: We all read about 
the £40 per game shocker. 
Microdeal imported Shock* 
trooper, converted it and sold 

single out Quickbeam, as 
people sometimes do. when 
many original games were 
selling for more than half 
t heir p rices at ati me w hen the 
market was much bigger. 
Pam D'Arcy's recent ex- 
perience has also been that 
developing games to a com- 
mercially competitive stan* 
dard Is fust not cost-effec- 
tive* Put it another way: the 
cheap original game soft- 
ware now available Is being 
subsidised by the author's 
freetimejulltimeloband/or 



14 Grantley Close 
A$hford t Kent TN23 WE 

Some of the DU readers are 
very good programmers and 
I hope someone who feels 
able to write (or sell you) a 
watertight costing program 
for the '32 will get in touch. 
Have a word with Bob Harris 
and one or two other Dragon 
suppliers as well. 



it Games such as Paper 
Round, Sailor, Brewmaster, 
Gantetet f Zaxxon, Pooyan, etc, 
etc. which are freely available 
America are not freely 
here. MicrodeaJ 
don't import them because 
they run mainly on Dragon 64s . 
The problem is not conversion 
(most games run perfectly or 
with small alterations) but im- 
port tax, licensing etc. Only a 
large company can afford all 
this. Broomsoft would, but we 
need funds. There is some ex- 
cellent software in America, 
but it would cost a bomb to sell 
it. Even if we Imported and 
licensed it we would have to 
sell at about £10 a shot to 
recover our losses. I'm sure 
many owners will write and 
say, H l don't mind paying £10", 
but we'd need advance orders 
and consumers might be dis- 
appointed. 

Best wishes for the Dragon - 1 
will be happy to answer in- 
dividual readers' queries on 
the above subjects. 



30 Broomhilfs 
Weiwyn Garden City 
Herts AL71RF 

family. Utilities are a slightly 
different kettle of fish, but 
the same underlying prin- 
ciples apply. 

As you point out, most ot 
Microdea r s g a mes were con- 
versi o ns f ro m ot he r sou rces , 
so that development costs 
had already been subsidised 
before the game ever hit the 
Dragon market. Your 
estimate of the approximate 
sel I i n g c o st of a I i cen sed con- 
version In the Dragon market 
is some indication of how 
much money is involved. 




2 Dragon User April 1988 



The same 
old bug 

I enjoy reading every Dragon 
User from beginning to end 
and always find something 
interesting. My Dragon 64 with 
two disc drives (and Superdos} 
has been harnessed to 
breathe some fire into my daily 
activities such as writing let- 
ters, invoices, accounts, doing 
mathematics, a b it of CAD, etc., 
most of which are my own 
programs. 

There is one bug, however, 
which DU has in common with 
pretty well all other electronics 
and computer magazines, 
which is that a published pro- 
gram very rarely works first 
time. The reason is usually a 
small innocuous error some- 
where along the line. 

An excellent example of this 
has crept into the February 
issue on page 26, the long 
multiplication. Line 130 should 
read: 130 V* i =STR$(Z):Y$= 
MID${Y$,2), Only then the pro- 
gram works. And I must con- 
fess, it took me several even- 
ings until 31 st Jan, when I had a 
sudden flash of inspiration. I 
think the reason was that on 



running the incorrect program 
halted with LS error in 140, not 
130. It just shows that even a 
short program is not as easy as 
all that to understand fully. 

J. Segenschmid 
Hill Cottage 
Ptomer Hitt 
High Wycombe 
Bucks HP13 5NB 



American 
'color's 

I might be able to shed light on 
a couple of problems. Firstly, 
Peter Whitaker's word pro- 
cesser was designed to run on 
Dragon DOS. It will not save on 
CumanaDOS, I once wrote to 
Peter on this subject and what 
follows is his advice; 

Use the tape version of the 
program. To save, first exit to 
Basic, then save the whole pro- 
gram to disc using SAVE 
"filename"3072 1 PEEK(4116)* 

256+PEEK{4117),4151. This 
saves the whole program com- 
plete with text. When you 
reload the program, and EX- 
EC(4151) it, the text will load 
with it. Peter's address was 
then 73 Norwich Street, Cam- 



bridge, {ft appears that Pater 
has finally moved away from 
that area, and our attempts to 
find him have proved futile. ) 

The second point relates to 
mon i tors . I have acq u i red a b/w 
monitor with poor definition. 
When using the text screen or 
Hkes green screen I am better 
off with a TV. However, when 
you use the black and white 
display (as with Basic 42 and 
available on EDIT+) definition 
is pencil sharp and shimmer 
free. It is possible that the VDG 
(being made for the American 
market) puts out a red/yellow/ 
blue signal as opposed to the 
red/green/blue signal that we 
use. This would also explain 
the lack of an RGB output. 
There was a company called 
Rapid vac in Hull who advertis- 
ed t h at t hey wo u Id se n d detai Is 
on how to convert your display 
to black and white for one 
pound. All they did for me was 
convert my pound into pints, 
and I heard no more. 

I hope this helps. Now all I 
need is a poke to make Elec- 
tronic Author run on a black 
and white display, 

Ken G. Smith 
33 Giack Road 
Deai Kent CT14 9ND 



MY unofficial technical de- 
pa rt me nt says t hat , wh i I e it is 
theoretically possible to 
create full colour additively 
from magenta/cyan/yellow 
light sources {these are the 
secondary colours used 
subtract ively in full colour 
printing), in practise the 
primary additive colours, 
red, green and blue, are used 
universally in television, and 
are not affected by the dif- 
ferent colour transmission 
standards used in different 
countries. (British PAL is in 
fact an upgrade on American 

NTSC), Put another way, if 
the VDG has a separated out- 
put available, It will be an 
RGB output, 

Unless, of course, the 
whole system works like the 
tourist Twof lower's camera 
in Terry Pratchett's The Col- 
our of Magic. 

In all probability the Dra- 
gon is supplying the btw 
monitor with an unbalanced 
colour output. The colours 
have to be fed in In different 
proportions to give a 
uniformly bright display in 
black and white, otherwise, 
the definition will be fuzzy. 

However, I shall have to 
leave it to somebody else to 
reveal the solution. 



Crossword 



The fifth Dragon Crossword raises its dinky head 
with conundrums (not for dumdums) from the 
glorious history of Dragon games. And we have the 
results from crossword three: the fortunate few, pick- 
ed up off the mat, were Paul Priestland of Lechlade, 
who sent us a shopping list a mile long, and Richard 
Moss of Blackpool, who doesn't want a platform 
game. 

There will be a couple of free tapes from the 
Editor's Magic Bottomless Box for the first correct 
entries to reach us each month. You can even try tell* 
ing us which tapes you'd like in an ideal world. It all 
depends on what we can find. 

And you don't have to cut up your Dragon User, 
either — entries can be written out on a photostat or 
a plain piece of paper, as long as we can read them, 

1 . Steal a chopper from unusual North coast patch 

(5 f 6) 

2. The fellow with the money? (7) 

3. Gripes like anything about German war game 

(10) 

4. Scribbling insect, or a V1 flyer (6,3) 

5. Barry rubs gem arou nd to get silly junk food ! (5,7) 

6. A mere bird to steer a missile by? (4,5) 

7. Waifs grown up to make battles fly away! (5,2,3) 

8. Sounds like a walking defect from ancient 
Greece (7) 

9. 9. No hoperwith twisted mop — the cow jumped 
over it! (4,6) 

10. A doom quiz about a famous campanologist (9) 

1 1 . Handle rock, to shut once will let you in on it (10) 

12. Fearless Russian who reads hot rod bibles! 

(5,3,4) 

13. Sorcerers in conflict? (6,3) 



DRAGON QUIZ 




by Terry and Derek Prnbyn 



All this month's 
answers are names of 

Dragon software. 
When the crossword is 
complete, the column 
marked with an arrow 
will spell out a phrase. 
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Dragonsoft 



Two is 
company 



New software for review should be sent to Dragon User, 
1 2-1 3 Little Newport Street, London WC2H 7PP. 



Program: Spy Against Spy 
Supplier: Pulser 
Prtee: £545 (disc) 

SHORTLY before Christmas I 
was in the usual turmoil of 
working out what extra little 
presents to buy my eldest son 
aged fourteen when I heard 
whispers about a completely 
different type of game that 
could be played between two 
players. I did not even know the 
name of the game but was told 
that Pulser Software were sell- 
ing it so I contacted Brian 
O'Connor. He is used to me 
approaching him at the North- 
ern Dragon Shows trying to 
scrounge software for reviews 
in Update but soon became 
more affable when he realised 
that I was ringing up as a pay- 
ing customer. At first he said 
that they had no new games 
software but then said that it 
must have been 'Spy Against 
Spy 1 that I had heard about. 
When I explained that it was to 
be a present he agreed to let 
me buy a copy as it was 
playable although not quite 
ready for marketing, He also 
promised me a completed 
version. 

It arrived and having booted 
the disk I was greeted with the 
usual high standard of Cart- 
wright musical accompani- 
ment and pressed the left fire 
button to access the one- 
player option, playing against 
the computer. I will first explain 
the general idea of the game 
but listen very carefully as I will 
say this only once. You take the 
part of a spy searching for 
various items hidden through- 
out a ve ry larg e b u ild i ng . At fi rsl 
you do not realise quite how 
m any room s t h e re are bu t soon 
you realise that the television 
set is in a different part of this 
room or that the window is on 
the opposite side of the picture 
in that room. In fact there are 
100 rooms altogether, com- 
plete with cupboards, litter- 
baskets(?)< and chests of 
drawers as. 

Mapping out is very difficult 
for this game as you have to 
move fairly quickly and also 
keep an eye on what your op- 
ponent is doing. Some doors 
can only be passed through if 



you have found the key. The 
key and the other items cannot 
be seen but are obtained by 
moving to the pieces of fur- 
niture etc and pushing the 
Joystick forward, the item be- 
ing taken if it is there. The 
screen is split into two with the 
computer or the second player 
u si ng th e to p h atf of the sc reen . 
At first some rooms appear to 
have no exit until you notice a 
slight tinge in the middle of the 
bottom portion of your part of 
the screen and you realise you 
can come back out of the room . 
The first player to find all the 
items, then escapes by going 
ou 1 1 h roug h a c e rta i n door to be 
whisked away safely in a 
helicopter. However you are 
allowed a limited number of 
bombs and water iraps with 
which you can take the items 
off your opponent, 

To set these bombs and 
traps you must either push the 
joystick forward or pull it back 
depending on which type you 
wish to use and then press fire 
but care must be taken with the 
position i n g of t h e joyst i ck wh i I e 
doi ng i t as you can not d o th is if 
it is n ot positioned precise I y. 
Also if the second player 
discovers an item that the 
other has already found then 
he takes it and the first player 
loses it. The first verion that I 
played with had unlimited 
bombs and soon ended up in a 
mass bombing session with 
nobody getting anywhere but 
now one has to plan where to 
plant a bomb especially as on- 
ly one will explode if you should 
inadvertently place more than 
one in the same room at once 
Scoring is based on 
discovering the items first and 
also bombing your adversary. 
Points are awarded to the first 
person to find each article and 
you also get points every time 
you bomb your opponent. The 
time I i mit fo r you r m ission is ap- 
proximately nine and a half 
minutes which may sound a lot 
but believe me it is not as I have 
only been able to com plete it by 
setting it to a two player game 
and then just use the one (hav- 
ing mapped it by playing it 
ma ny t i m es i n the same mode*) 
The graphics are not brilliant 
but this is more than made up 
for by the originality of the 
game as I k now of nothi n g eve n 
rem ote I y si m i la r f or the D rago n 
although I wonder whether 
spies really have such large 
noses. Care has to be taken 



when moving forward or back- 
wards through rooms as it is 
easy to move too f a r a nd m iss a 
room. 

At times I found it difficult to 
pick up the hidden objects 
even though I know where they 
are. I will give the author the 
benefit of the doubt that this is 
to simulate searching through 
drawers. One touch I did ap- 
preciate was that if you found 
the key and entered one of the 
locked doors you were not 
prevented from retracing your 
footsteps if the other player got 
the key off you. 

This shows the thought that 
has gone into the game as it 
would have been completely 
ruined if one player had been 
trapped behind locked doors. 
To summarise, this is a good 
two- player game, which is a 
rarity in itself, but playing 
against the computer is not as 
realistic unless foreign spies 
are being recruited because 
they are not very intelligent. 
Worth it though for the two- 
player version and nice to be 
able to practise by oneself. 

Mike Stott 
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A real 
racer 

Program: Formula One (Tape 
or DragDOS disc) 
Price: £8.95 

Supplier: Pamcomms, John 
Penn 

HOT on the trails of the old and 
brill Speed Racer, comes for- 
mula One by our dear Pam. 
Many of you out there will have 
bought Speed Racer from the 
late Microdeal f and will have 
thought that the super smooth 
graphics and scrolling track 
were superb, but let me tell you 
that Formula One is even bet- 
ter, This review is for the tape 
version, but I think that the disc 
is 



The game is identical to 
Scatetrix for the (dare I say it) 
Spectrum. It is a split level race 
the other on the bottom. You 
can either play against a friend 
or the computer There is aiso a 
Track Designer on side B, 
which is also in Scatetrix. 



The game is in machine 
code and so is loaded by 
Cloadm . After l oading, you can 
transfer to DeltaDos disc (in- 
structions on how to do so are 
given in the manual), or type 
EXEC to start the game. 

First of all, the computer 
asks you to enter player 1's 
name, and then player 2's 
name. If nothing is typed in 
and ENTER is pressed for 
player 2's name, then the word 
Micro appears in player 2s 
box, and player 1 will play the 
computer. 

Using the right joystick, a 
little arrow is moved to a 
selection of boxes marked 
YES and NO, to select various 
options. 

The first option is to select a 
track already included in the 
game. Selecting Yes shows 
you the 17 different tracks 
available to choose from. 
Selecting the icon YES takes 
you to a question marked 
'LAPS ?' where you type in the 
number of laps you want to 
make around the circuit from 
1-99. If the option to play the 
computer was chosen, then a 
message of which difficulty 
level the micro should have 
appears. These are 1 Easy 
(easy to lose), 2 medium (a 
fair chance), and 3 difficult 
(very easy for you to lose). After 
your choice, you go onto the 
game. 

Selecting NO from the 'Use 
a computer track' option, takes 
you onto the 'Load a track 
option', where you can load a 
track which you have designed 
using the track designer pro- 
gram. Selecting YES loads the 
track, and selecting NO takes 
you back to the 4 Use a com- 
puter track' option, 

The screen display, the 
screen is split into 3 thirds. 
Player 1 in the top third, player 
2 in the middle third, and the 
players maps (to show were 
they are on the track), and the 
mileo meters in the bottom 
third. The background for the 
track (the buildings and moun- 
tains etc) remain the same for 
each track, and they turn in the 
opposite direction to which the 
car is turning, to make the feel- 
ing of movement- To give the 
feeling of travelling forward, 
various objects come towards 
you at the speed of the car. The 
objects are Cones, Barrels, 
and Sign posts, 

continued on next page 
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ring the News Desk on 01 -437 4343 



Discs of Destiny Tapez-vous 



9 



DISKBASE for Dragon DOS 
(the disc version of Magbase, 
£2.99 all inclusive) and Joh ri- 
al ha n Cartwright's adventure 
trio Starship Destiny, Dungeon 
Destiny and Wild West Destiny 
are available in tap© and disc 



from previous page 

You use the joysticks to 
control the cars, and the way 
you use the joysticks is: For- 
ward/accelerate, back/brake, 
and right/turn, It is ad- 
to use potentiometer 
joysticks where ever possible. 

Player one is situated at the 
top half of the screen, while 
player two is situated at the 
bottom half. After a couple of 
seconds, the lights at the right 
hand side of each half turn 
to stripes, and when the 
joystick/joysticks (Depending 
on wether one or two players) 
are pulled back, the lights go 
white and away you can go. 
You r top speed is 240mp h . Th e 
screen scrolls beautifully, and 
after every lap you r ti me for that 
lap is shown. Trying to take 
over your opposition's car is 
very difficult, and if the two 
cards collide then it is con- 
sidered that the person behind 
is the looser. Pressing BREAK 
during the game resets the 
prog ram to th e very beg i nni n g r 
and pressing CLEAR takes 
you back to the 'Use a com- 
puter track' option. After the 
desired number of laps or a 
crash, then the victory and 
looser screen is displayed. 
This shows both the winner 
and the loser at the same time 
and the cars are at the same 
places, one at the top and the 
other at the bottom. The victor 
is shown standing beside his 
car jumping up and down with 
a victory message under- 
neath, and the loser is shown 
next to his car stamping his 
right foot up and down and 
shouting an exclamation mark 



After the victory/loser 
screen the option 'Same 
again' appears. Selecting YES 
will take you back to the start 
line with the same optins 
selected like no, laps, and 
Selecting NO, wipes out your 
loaded in track if any, and 



versions from Pulser Software 
for £3.99 each or £8.99 to- 
gether. Look out for reviews of 
the trio in due course. 

Pulser Software, 36 Foxhifl, 
HighCrompton, Shaw, Oldham 
OL2 7NQ. Tel. 07D6 849189. 



a 



takes you back to the 
computer track option' 

The track designer program 
i s on sid e B of the cassette, an d 
is loaded with CLOADM EXEC 
Upon running the prog, the 
option 1 Design a circuit' is 
displayed. Selecting YES 
takes you to t h e d esig ne r, wh i I e 
NO takes you to 'Use a com- 
puter track 1 option. Selecting 
YES lets you add further 
pieces to the 17 built in tracks, 
while selecting NO lets you 
load in a track to finish it off or to 
c heck that a track loads alright. 

The designer has 15 pieces 
of track to choose from and 
four other options. These op- 
tions are SAVE — save the 
track to tape, CLOSE — close 
links the start and end pieces of 
track together Jf possible. LIFT 
removes the last piece of 
track , and ABORT takes you 
to the start of the designer 
program. The 15 pieces of 
track are Straight A, Straight B, 
Straight C, Straight D, Stan- 
dard curve, Standard curve A. 
Outer curve, Outer curve A, 
Double Inner curve, Banked 
curve, Skid Chicane, Chicane 
Out, Straight chicane, Curved 
chicane, and Chicane IN, If you 
pick a curve, then an option to 
make it go anticlockwise or 
clockwise is given, OOPS, I 
almost forgot to tell you that 
you that there's an option to 
make you travel north, south, 
east or west. 

Overall, it is a beautiful piece 
of programming, and it is way 
better than the three year old 
Speed Racer. I would urge peo- 
ple to buy the game and not 
pirate it. even at the price of 
£8.95, because if not enough 
poop I e bu y the gam e then Pam 
might have to quit producing 
software and we don't want 
that, do we, 

David Unstey 



Dragon Taped Computerware 
tells us that is has now pub- 
lished its French Collection (!) 
including a vocabulary test a 
verb test, and a French 
dictionary. The words for the 
vocabulary test and dictionary 
are programmed in by the user 
with an extensive and easy to 
use data creation program 
which is also on the tape. The 
programs and files can easily 
be changed for English — 
Spanish or any number of 
other useful language com- 
ons. 



The vocabulary test was 
included in the first issue of 
Dragon Taped and the diction- 
ary in the second issue. Both 



£1.50. Issue two includes 
English word games, adven- 
ture and arcade columns on 
tapa 

People who already have the 
other two items can buy the 
verb test for £1, The combined 

test/dictionary tape costs £3. 
All orders and enquiries to 
A R Hopkins, Common Farm, 
Shifnal, Shropshire TF11 9HN. 



Siegfried returns 



THE Siegfried Computer- 
Gruppe of Germany an* 
nounces a meeting for Dragon 
enthusiasts to take place on 
Sunday 26th June 1988 in 
Jugendzentrum Kratsstation, 
H o ns be rg e r St rasse 2 , D-5 630 
Remscheid, Federal Republic 
of Germany. Admission 2 DM. 



The Gruppe will be demon- 
strating MIDI, a mouse, sound 
sampling, a scanner, ram - and 
e prom-d i scs, all on th e D ragon . 



the Siegfried Computer- 
Gruppe, Dina-Ernstberger- 

Strasse 23, D-8524 Neunkir- 

chem am Brand 1, FRG, 



Fire and games 



Dragonfire Services have ad- 
ded to their list of titles Decath- 
lon (£3.00), Dragon Music (two 
tapes of Bach, one of Scott 
Joplin, £3.00 each), the text 
adventure Underbeings of 
Croth (£4.00) and the spelling/ 
maths tutor programs Maze- 
race and Spelfbase (£5,00 the 
pair). 



were developed by teachers 
from two primary schools and 
have had many hours testing in 




the 6-11 age group and teaches 
spelling with large colour pic- 
tures, and practices addition 
and subtraction in the maths 
section. Spelibox is for the 7.1 2 
age group and teaches spell- 
ing from a vocabulary of 
around 600 words, while prac- 
ticing addition, subtraction, 
multiplication and division in 
the maths section. Both have 
automatic level selection, in- 
creasing or decreasing the dif- 
ficulty according to the child's 
ability. 

Both programs use high 
resolution colour text and 



graphics. Previously available 
from the authors, this package 
was favourably reviewed by 
Dragon User in 1987 

Decathlon features ten 
games for 1 to 5 players, in- 
cluding Anagrams, Hangman 
and Shootout, Ideal for parties 
and idling away wet after- 
noons, this package originally 
had a four-d ragon review from 
DU. 

Underbeing of Croth is a 
rescue adventure taking place 
i n the si imy c a ves of C roth , Th e 
program understands dual 
commands such as pick fruit 
then eat it' and has a save- 
game feature. 

The Dragon Music pack- 
ages each have three, four part 
harmony transcriptions of 
music from two popular com- 
posers, accurately transcribed 
from the originals. DM I and II 
are by Bach, and DM III 
features Scott Joplin, Please 
specify the number when 
ordering. 

Dragonfire Services, 13 
Parry Jones Close, Blaina, 
Gwent NP3 3NH. 
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Part five ofPam D'Arcy's introduction to machine codes 



REPLACING the subroutine lines 

UP/MDWN/MLFT/MRGHT with listing 12 
updated following last month's techniques 



a) inserting $ symbols after the # where 
the required generated code is identical 
with values in the operands 

b) replacing addresses $6400-56403 in 
the operand column with position indepen- 
dent WORKO-3, PGR 

results in listing 13 — a fully working, 
relocatable program on my system . 

Did you notice an inconsistency in the 
listing as taken from the book? The line at 
address $5069 in listing 13 actually has a 
DECIMAL value of IS in the operand col- 
umn so I particularly hope Dragon DOS 
users spotted this before experiencing 
disaster (if typed in as $15 = decimal 21 , the 
yetlow blob would be allowed to move un- 
seen over the d isc workspace area t poten- 
tially causing the drive(s) to operate and 
corrupt any unprotected discs currently 
loaded in them — f didn't court disaster by 
experimenting!) 



Instruction detail 

I will run over the nature of the instructions 
used and leave you to work out how and 
why the program works. Basically, unless 
there are any specific para meters^ data 
specially set up in registers or memory 
prior to the EXEC or BSR or JSR call, the 
contents of registers and memory for 



variables, set aside by the likes of the RMB 
instruction, are unknown and could con- 
tain anything. This is very different from 
Basic that gives you cleared variables the 
first time that a variable name is used (so 
no problems are encountered if the pro- 
gram adds 1 to cou nters etc wi thout clear- 
ing them first). Clearing or setting up start- 
ing values in registers and variables space 
in assembler is often referred to as initialis- 
ing fields, and a certain amount of this is 
carried out at the start of the program that 
we have been working with. 

When referring to a location containing 
zero or being cleared, this is when all its 
bits are unset(«Onol). For clarity, I usually 
follow it up with the reference to the word 
null or $00. This is because zero meaning 
the printable digit 0 has a decimal value of 
48 {$30; &H30), 

Apart from the special program counter 
(PC) mat is updated internally continuous- 
ly as the program is running and the con- 
dition code (CCR) register that is updated 
by most instructions as they are executed, 
values in registers and memory remain 
unchanged until instructions are executed 
that amend their content. 

Condition codes 

Five of the eight bits = flags of the condition 
code register (CCR) are commonly af- 
fected when executing instructions, The 
conditional branch instructions then allow 
us to vary program paths according to 
obtained results to achieve the aims of our 



program requirements, or specification. Of 
these five flags, the Half carry and overflow 
flags only tend to be considered for less 
frequently used types of arithmetic that will 
not be covered until later in the series. That 
leaves the common flags Negative, Zero, 
Carry, 

If a resulting condition is true, the flag is 
set (= appropriate bit is set to 1, $01), Thus 
if a result is negative, the program will 
follow a BMI path or not follow the BPL 
path; a Zero (null) result will follow a BEQ 
path or not follow BNE path. If the condition 
is untrue, the flag is cleared or unset 
(- appropriate bit is set to null) and 
reverses the above paths. 

The carry condition will be dealt with 
when encountered in a future example. 
As well as carry resulting from arithmetic 
instructions, the flag is often used by 
programmers as a return parameter to a 
calling subroutine to signify that the likes of 
validation checks on data passed to it 
were successful or otherwise. The BCS 
(Carry Set) and BCC (Carry Clear) are 
its associated conditional branch instruc- 
tions. 

Other conditional branch conditions, 
such as BLO and BGE, actually act on 
individual or combinations of the above 
flag settings but are readily understand- 
able in the context of source code where 
they are usually found following Co M Pare 
instructions. 

For completeness, all flags affected by 
the instructions described below will be 
specified. 



Listing 13 






















5B@t 




* 


LISTING 13 




5020 


B69F 




LDA 


a*9F 




5001 




* 






5022 


AEBCDF 




LDX 


WORK0 




5001 






VBLQB13 (FILENAME) 


5025 


A784 




STA 


.* 




5001 




* 






5027 


BD8006 


KBD 


JSR 


$8006 




5001 






THE YELLOW 


BLOB - PAGE 56 


502A 


27FB 




BEQ 


KBD 




5001 




• 


FROM "DRAGON MACHINE CODE " 


502C 


815E 




CMPA 


tt*5E 




5001 






BY JONES & 


COWS ILL {SHIVA) 


502E 


2<b04 




BNE 


DOWN 




5001 




* 






5030 


SD21 




BSR 


UP 




5001 




* 


CONVERTED 


TO BE RELOCATABLE 


5032 


20F3 




BRA 


KBD 




5001 




• 


(LISTING 1 


1+LISTJNG12) 


5034 


B10A 


DOWN 


CMPA 


«*0A 




5001 




# 






503fc 


2604 




BNE 


LEFT 




5001 




+ 


USING DSK DREAM ASSEMBLER 


5038 


BD2F 




BSR 


MDWN 




5001 






AFTER CLEAR200,8rH5000 


503A 


20EB 




BRA 


KBD 




5001 










503C 


810B 


LEFT 


CMPA 


#408 




5001 


160004 




LBRA 


GO 


503E 


2604 




BNE 


RIGHT 




5004 










504 0 


8D3D 




BSR 


MLFT 




5004 




WORK0 RMB 


1 i FOR 6400 


5042 


2 BE 3 




BRA 


KBD 




5005 




WORK1 RMB 


1 ; 6401 


5044 


SI 09 


RIGHT 


CMPA 


#*09 




5006 




WORK 2 RliB 


1 j 6402 


5046 


2604 




BNE 


BREAK 




5007 




WORK 3 RUB 


1 ? 6403 


504S 


BD4B 




BSR 


MRGHT 




500B 










504A 


20DB 




BRA 


KBD 




5000 


HE- 0400 


GO LDX 


#$0400 


504C 


B103 


BREAK 


CMPA 


#*03 




5008 


AF8CF6 




STX 


WORK0,PCR 


504E 


2702 




BEQ 


END 




S00E 


108EO1FF 




LDY 


**01FF 


5050 


20 D5 




BRA 


KBD 




5012 


8660 




LDA 


1**60 


5052 


39 


END 


RTS 






5014 


6F8CEF 




CLR 


W0RK2,PCR 


5053 












5017 


6F8CED 




CLR 


W0RK3,PCR 


50S3 




* AMENDED LISTING 


12 


501A 


A780 


CLEAR STA 


,X + 


5053 












50 1C 


313F 




LEAY 


-1 T Y 


5053 


8600 


UP 


LDA 


#*00 




50 IE 


26FA 




BNE 


CLEAR 


5055 


A18CAF 




CMPA 


WORK 3 


,PCR 



i 
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instruction analysis 

LD: LoaD a register. LDA and LDB copies a 
single byte of data into the specified B bit 
register; LDD, LDX, LDY, LDS, LDU copies 
two bytes of data into the specified 16 bit or 
double byte s i zed reg i ster, T he data m ay be 
an actual value, where the operand is 
preceded by a it symbol, or be copied from 
one (8 bit) or two (16 bit} consecutive bytes 
of memory. 

CCR flags: the overflow flag is always 
cleared »unset r The negative and zero 
flags are set if the content of the value 
being copies into the register is either 
negative or zero (null) respectively; other- 
wise the flags are cleared = unset, I will 
definitely go into bytes, double bytes and 
negative values in the next issue. 

Examples from listing 13 are LDX 
M $04€0 — copies an actual value of $400 
(= memory address of the start of the text 
screen) into register X; LDY #$1FF — 
copies a count of S1FF (decimal 511) into 
reg ister Y; LDA p$9F — copies t he val u e of 
the text screen graphics yellow blob 
(decimal 159 — Appendix A of the manual 
supplied with the Dragon computer) into 
register A; LDX WORK3Q\PCR — copies the 
current contents of the two bytes in 
memory locations WORKO and WORK1 
into register X. 

ST: STore contents of a register in 
memory. STA and STB copies the single 
byte of data into the specified byte of 
memory; STD, STX. STY, STS, STU copies 
the two bytes of data into two consecutive 
bytes of memory. 

CCR flags: the overflow flag is always 
cleared. The negative and zero flags are 
set if the content of the value being copied 
into memory is either negative or zero (null) 
respectively; otherwise the flags are 



Listing 14 

SB I 

4E21 
4E21 
4E21 
4E21 
4E21 
4E21 



* LISTING 14 
# 

* DENIS (FILENAME) 
* 

* DENIS D'MULLOY'S PRINT NAME 

* ROUTINE USING DREAM ASSEMBLER 

* AFTER GLEAR200, 20000 



4E20 


4E20 




ORG 


20000 


4E20 


BDBA77 




JSR 


♦ 8A77 


4E23 


3 1 8C0A 




LEAY 


NAME, PGR 


4E26 


A6A0 


LOOP 


LDA 


tV* 


4E2B 


BD800C 




JSR 


SQ00C 


4E2B 


B159 




CMPA 


tt Y 


4E2D 


26F7 




BNE 


LOOP 


4E2F 


39 




RTS 




4E30 


44454E4953 


NAME 


FCC 


/DENIS 0 ' MULLQY/ 



Examples from (fating 13 are: STX 
WORKD.PCR copies the current con- 
tents of register X ($400 as just loaded) 
into the two consecutive bytes at memory 
address WORKO (= locations WORKQ 
and WORK1); STA ,X copies the value in 



register A= the just loaded value S9F=test 
screen yellow blob to the memory address 
currently contained in register X= current 
cursor' position; STA ,X+ copies the value 
in register A -the just loaded value 
$60= text space character when being 
POKEd (see January 1988 issue) to the 
memory address currently contained in 
register X — then does someting else that 
has not yet been covered! The + is an 
index mode option known as auto incre- 
ment, mentioned in the December issue 
and covered following this section. 

CLR: CLeaRs the specified 8 bit 
operand. Operates on an 8 bit register or 
byte of memory only; it clears all 8 
bits =un sets all 8 bits= makes the 
byte -$00 (null). CLRA, CLRB or CLR 
memory are its possible formats, 

CCR flags: always clear (unsets) the 
negative, overflow and carry flags. Always 
sets the zero flag. 

In listing 13 the memory locations 
WORK2 and WORKS are cleared in 
readiness for arithmetic performed on 
them later. 

LEA: Load Effective Address. As 
previously mentioned, this is a most 
powerfu [instruct ion in creating position in- 
dependent code. It can be used with either 
of the indexable registers, LEAK, LEAY, 
LEAS, LEAU However, as in 



examples, in this routine it is seen in its 
register arithmetic mode, 

CCR flags: trust us to start with a special 
case again! LEAU and LEAS do not affect 
any flags of the Condition Code Register 
(CCR), In the circumstance of either of 
those registers being used for counting 
down (decrementing), one would need to 
follow the instruction with one that would 
indicate wher^zero had been reached 
(such as a STore instruction or CM PS/ 
CMPU 00). LEAX and LEAY affect only the 
ze ro f lag , so t h at wh e n it i s be i n g used as a 
simple counter as near the beginning of 
this code, a loop is created by following it 
with Branch Not Equal (branch if result of 
the arithmetic not equal to zero). 

Examples of LEA in its arithmetic mode 
in listing 13 are LEAY -1,Y, subtracting 1 
from a count; LEAX -32, X, subtracting 32, 
the width of a text screen line for effecting 
the arrow, and adding 32, subtracting 1 
and adding 1 to the contents of register X. 

BNE: Branch Not Equal. Conditional 
branch instructions act on the current set- 
tings of the CCR only and have no effect on 
its content. Depending on context, the 
BNE path is followed if the result of 
preceding arithmetic is not zero « >$00), 
as following the LEAY -1,Y instruction, or 
the result of a CoMParison of two items is 
Not Equal, as following CMPA lines further 



Listing 13 continued 



— 



505B 


270E 




BEQ 


ENDUP 


50BA 


6A8DFF7S 




DEC 


WORK 2, PCR 


505 A 








ft* 60 


5B8E 


301F 




LEAX 


-1 ,X 


505C 


A7B4 




STA 


** i 


5090 


869F 




LDA 


ft*9F 


50 5E 


6ABCA6 




DEC 


WORK 3 n, PCR 


5092 


A784 




STA 


,x 


5061 


3OB8E0 




LEAX 


-32, X 


5094 


39 


ENDLFT 


RTS 




50^4 


869F 




LDA 


ft*9F 


5095 










5066 


A784 




STA 




5095 


861F 


MRGHT 


LDA 


**1F 


5068 


39 


ENDUP 


RTS 




5097 


A18DFF6B 




CMPA 


WORK 2, PCR 


506 1 ? 










509 B 


270E 




BEG) 


ENDRBT 


5069 


B60F 


MOWN 


LDA 


#15 


509D 


8660 




LDA 


tt*60 


506B 


A1BC99 




CMPA 


WORK 3, PCR 


509F 


A7B4 




STA 




506E 


270E 




BEQ 


ENDDWN 


50A1 


6CBDFF61 




INC 


W0RK2,PCR 


5070 


3660 




LDA 




50A5 


3001 




LEAX 


1 *x 


5072 


A 7 84 




STA 


,x 


50A7 


B69F 




LDA 


ft*9F 


5074 


6CBC90 




INC 


WDRK3,PCR 


50A9 


A7B4 




STA 


• x 


5077 


30B820 




L LAX 


32, X 


50AB 


39 


ENDRGT 


RTS 




507A 


86 9F 




LDA 


tt*9F 


50AC 










507C 


A7B4 




STA 


iX 


50 AC 










507E 


39 


ENDDWN 


RTS 














507F 




















50 7F 


8600 


MLFT 


LDA 


#$00 












5081 


AIBCB2 




CMPA 


WDRK2,PCR 












50B4 


270E 




BEQ 


ENDLFT 












50 B 6 


8660 




LDA 


#*60 












50 Be 


A 7 84 




STA 
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Listing 15 

500) 

S001 

1 
1 

5001 
5001 

500 1 
5001 

5001 BDBA77 
5004 308C19 
5007 SD0D 
5009 308C6C 
500C 8O0B 
S00E 30BC1E 
5011 6003 
5013 8D01 
5015 39 
5016 

501 h 
5016 



LISTING 15 
STRINGS (FILENAME) 

PRINT A STRING ROUTINE 
US INS USKDREAM ASSEMBLER 
AFTER CLEAR200,S.H5000 



♦ BA77 

WAME,PCR 

PRINT 

NL*PCR 

PRINT 

lNFO^PCR 

PRINT 
PRINT 



PRINT SUBROUTINE 

ENTRY: X^MEMORY ADDRESS OF 



5016 
5016 
5016 
5016 

5016 A6B0 
5016 2705 
501 A BD900C 
50 ID 20F7 
50 IF 39 
5020 



* FX IT 



IRST BYTE IN STR 
LL BYTE ENCOUNTERED 



NU 



IN STRING 



PRINT LDA 
BED 
JSR 



F NU 



NAMF 



502E 00 

5BZF 44454D4F4E INFO 
503F 4F4E45204D 
b04D 0D 

504E 5052494E54 
505E 5553494E47 
506C 0D 

506D 535542524F 
5077 00 

507B 0D00 NL 

507A 

507A 



RTS 

FCC 
FCB 
FCC 
FCC 
FCB 
FCC 
FCC 
FCB 
FCC 
FCB 
FCB 



PRINT 



/DENI5 OMULLOY/ 
0 

/DEMONSTRATION OF/ 
/ONE METHOD FOR/ 
13 

/PRINTING STRINGS/ 
/USING A COMMON/ 
13 

/SUBROUTINE/ 
0 

13,0 



down the code. Us complement is BEQ, 
Branch on EQuaL 

JSR: Jump to SubRoutine. In its 
simplest understanding, Jumps to the in- 
struction at the memory address specified 
in the operand and returns to the following 
instruction when its RTS (ReTurn from 
Subroutine) is encountered. Although I 
have generally alluded to JSR ringing war- 
ning bells of impending position depen- 
dent code, it IS possible for it to have an 
operand of LABEL, PGR which generates 
position independent^ relocatable code 
(unlike BSR, the ,PCR MUST be present, 
or else an extended address ^position 
dependent code will be generated). The 
generated code is a byte longer than its 
BSR/ LBS R conterpart, although there is 
no need to differentiate between long and 
short branches. For readability and com- 
pactness, BSR is recommended when 
writing relocatable code. 

OCR flags: none 

BEQ: Branch on EQuaL The comple- 
ment of BNE. 

CMP: CoMPare, CMPA, CMPB com- 
pares the specific 8 bit register with a 
single byte of data; CMPD, CMPX, CMPY. 
CM PS, CMPU compares the specified 16 
bit or double byte sized register with two 
consecutive two bytes of data, The data 
may bean actual value, where the operand 
is preceded by a # symbol, or be one (8 bit) 
or two (16 bit) consecutive bytes of 
memory. Compare leaves the CCR set for 
appropriate conditional branching, 



Classified 



CCR flags: negative, zero, overflow and 
carry flags (plus halt carry unpredictably 
affected with CMPA/CMPB) are ser/ 
cleared as appropriate. There are, how- 
ever, specific comparison result branches, 
eg B LO to BG E , t h at are m ore I og ical to use 
than trying to operate on the actual flag 
information. Signed and unsigned bran- 
ches will be dealt with next month. 

Example from listing 13 are CMPA 
(keypress) with actual values (ASCII 
values for arrow keypresses and break 
key); in the cursor movement routi nes, the 
cursor |imits(columnsO and 31 ; rows or line 
0 and 15) are loaded as actual values into 
register A and are compared with the cur- 
rent contents of WORK2,PCR snf WORK3, 
PCR (that are the current cursor column 
and row values) to check that the user is not 
trying to move the cursor* beyond the 
screen edges, 

BSR: Branch to SubRoutine. The usual, 
logical subroutine branch instruction 
when writing position independent = 
relocatable code In its simplest u 
stand i ng f b ra n ches to the i nstr uct i on at 
memory address evaluated from the (label 
n ame) opera nd and retu r ns to the follow i n g 
instruction when its RTS (ReTum from 
Subroutine) is encountered. If branching 
>127 bytes away, requires the Long branch 
form of the mnemonic (LBSR). 
Assemblers usually advise of instances 
where a long branch is needed rather 
any short ones used. 
CCR flags: none affected 



RTS: ReTurn from Subroutine In its 
simplest form, returns to the instruction 
following the last BSR, LBSR or JSR car- 
ried out. 

CCR FLAGS: none affected 

DEC: DECrement. Subtracts one from 
the specified 8 bit operand. Operates on an 
8 bit register or byte memory only; DECA, 
DECS or DEC memory are its possible 
formats, 

CCR flags: negative and zero. The 
overflow flag is set if the original operand 
was $80, else is cleared. 

In listing 13, DEC is used to subtract one 
from the current cursor position for valid up 
and left arrow keypresses. 

I NC: INCrement. Adds one 1o the speci- 
fied 8 bit operand. Operates on an 8 
bit register or byte memory only; INCA, 
INCB or INC memory are its possible 



CCR flags: negative and zero. The over- 
flow flag is set if the original operand was 
$7F, else cleared. 

In listing 13, INC is used to add one to 
the current cursor position for valid down 
and right arrow keypresses. 

Monthly workout 

To conclude our work on YELLOW BLOB 
— do you think that the program is error 
free? How long is the text screen? Have you 
learnt a shorter coding method of clearing 
the screen than using the CLEAR loop in 
listing 13? 



DRAGON 32, recorder, Joy- 
sticks, desktop software, 
books, £110 complete^ will split. 
Tel : 0272 711546. 



DRAGON 32 and 64, Dragon- 
DOS, double disc drive, dot 
matrix printer, software, books, 
magazines etc. SAE for list to P. 
Rosier, Balsall St , Balsall 
Common, Coventry. Tel. 0676 
32322. 



HERE'S MY CLASSIFIED AO. 
(please write your copy in capitals on the lines below) 



DRAGON 32, data recorder, 25 
original games, £80 Tel. 0327 
76079. 
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■ ■■-fell* 



CGP-115 printer/plotter VGC, 
including lead . €40ONO. 0438 
352518, 



Address *•»»** 

. + ...... , Tel: 

Classified rate: 35 p per word. 

Please cut out and send this form to: Classified Department, 
Dragon User, 12^13 Utile Newport St, London WC2H 7PP 



* 
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Winners and Losers 



Every month 
Gordon Lee will 
look at some prize programming 



A real tough ie November's competition 
turned out to be — but with the dark winter 
nights, what better excuse is there than to 
wrestle with a real brain leaser? Some 
competitors thought otherwise: 

"My hair is falling out quick enough 
without competitions like these" — Phil 
Sapiro 

"With competitions like these, Dragon 
User will probably lose some friends! ! !" — 
MarkTowlson 

Nevertheless, a number of excellent 
solutions were received. Nearly all com- 
petitors found the quick way of calculating 
the total of any six-letter word once each 
letter had been converted to its alpha- 
betical rank. This was to multiply each of 
the letter values by 1, 5, 10, 10, 5 and 1 
respectively. So for the word DRAGON we 
would get- 



Alphabetical p 


ho sit io 


n factor 


product 


D 


4 


1 


4 


R 


18 


5 


90 


A 


1 


10 


10 


G 


7 


10 


70 


0 


15 


5 


75 


N 


14 


1 


14 


TOTAL 






263 



Before the above routine can be applied, 
the words to be tested must be selected, 
and it was here that the competitors 
showed much variety and ingenuity 
Basically, there were three modes of 
attack: 

1) Typing in a list of words, for example, from 
a crossword compiler, and testing each 
word in turn to find its total val ue. Some en- 



tries included the list as DATA lines — 
typically containing six to seven hundred 
words — while others relied on each word 
being input in turn before the test was 
made. Both of these techniques rely on the 
a vaila bi I ity of a c ross word co m pile r to eas i - 
ly select words of six letters, plus the need 
for a reasonable typing speed to facilitate 
an easy inputting of the data. 

2) Using a 'seed 1 word and varying in- 
dividual letters depending on certain 
parameters. For example, taking the word 
DRAGON which we know to have a total of 
263, any letter can be changed if its com- 
plementary letter is also altered by a 
reverse amount. For instance, if the initial 
letter, D, is altered to a C, the total can be 
be lanced by changing the final letter to an 
O. This will produce the sequence 
'CRAGOO 1 which can be accepted or re- 
jected as a possible word . 1 n the same way, 
the R and the O can be balanced' as these 
letters both have the same multiplication 
factors, as do the middle pair of letters, A 
and G The advantage of this method is 
that the middle pair of letters can only have 
a limited range without taking the total 
above 263, Unfortunately, competitors 
who used this approach tended to score 
fewer words than those using other 
methods, but this is an idea which, one 
gets a gut feeling, could produce some in- 
teresting results if correctly handled. One 
would have to remember that there would 
need to be a certain amount of "cross- 
exchanges 1 between the letters if this 
method was to be fully explored. A typical 
cross -exchange would be to alter the R of 
DRAGON to an S and balancing it by, 
reducing the final N by five letters to an I. 





at Ailing 2fa3s 












ACHING 


CHEESY CC1CKFT 


CODIFY 


COIFFE 


CYBELE 


DEARES 


DRAGON 


HOMAGE 


ITCHES H1CKLE 


MOBILE 


MUCATE 


MUDDLE 


NILGAI 


PEGLFR 


REDE.VE 


RENAME SACRED 


SAILED 


BANIAN 


SCALPS 


SCfWtPI 


SEAftED 


SHAIRN 


SHIELD SIDERS 


SOCKED 


SOBBED 


SPICES 


STEAMS 


SWEDEN 

















3} Generating permutations of letters 
and scanning visually to check for the pre- 
sence of any acceptable words. This 
technique produced the best results, 
although certain additional techniques are 
necessary to reduce the n urn her of per- 
mutations that would otherwise be possi- 
ble. Without any restrictions there are 
almost 309 million permutations of six tet- 
ters which needed to be whittled down to 
the two dozen or so words which were final- 
ly discovered. This was generally achieved 
by taking as a starting point only those two- 
letter combinations which can begin a 
word. Thereafter, each letter is appended 
in turn, provided that its value does not 
cause the final total to be exceeded. This is 
the technique used by Mark Tow I son , who 
managed to score the highest number of 
words, despite being sent boz-eyed over 
quite a number of nights'. Mark's listing is 
given here The 26 DATA lines are used to 
denote atl possible first and second letter 
coupl ings in a rather ingenious way. Each 
of the lines relates to each initial letter in 
turn, and the position of the 1s within that 
line denote the second letter coupling. For 
example, the 17th DATA line (representing 
'Q', the 17th letter), has a 1 only at position 
21 i indicating that the combination QU' is 
the only one possible. 

The last word this month goes to Keith 
David who tried a number of approaches 
and concludes his letter: "The final ap- 
proach is to do it the hard way, Thiat is, to 
write a program to test inputted six-letter 
words. The facility was added to store and 
recall any successful words found. Op- 
timistically, the storage string was dimen- 
sioned to hold 200 such words, and I 
expected to fill this in about half an hour. 
After many frustrating evenings at the 
keyboard, I have now found five words, one 
of which is dubious!" 

For Keith, and all other competitors, afull 
list of acceptable words (from Chamber's, 
Webster's or the OED) is printed here. 



20 



REM DRAGON USER NOV J9B7 PUZZLE 
Din Z*C26>;FOR 1 = 1 TO 26s READ Z*(I>iNEXT 

DATA 01 1 1 1 1 1 1 1 1 M 1 1 1 J 0111 1 J 1 1 1 1 

40 DATA 1 000 1 00 1 1 00 1 00 1 00 1001 0001 0 

?>o | >a t A 1 OOO 1 OO 1 1 OO 1 O0 1 00 lOi 1 1 000 1 0 

AO DATA 1 OOO 1 OO 1 1 OOOOO 1 0 O 1 00 1 O 1 O 1 O 

70 DATA 1 1 1 1 1 1101011 1 1 t 11 11 11 11 110 

80 DATA 1 OOO 1 OOO 1 OO 1 OO 1 OO 1 OOl OOOOO 

90 DA T A 1 OOO 1 OO 1 1 GO 1011 OO 1 OO 10001 0 

HO DATA 1 11 101 1O0OO1 11 lOOl 1101O0O0 

I 20 DATA 1 OOO 1 OOO 1 OOOOO 1 OOOOO 1 OOOOO 

130 DATA 1O0O1O1 1 100101 10O1 10101 010 

1 4 O DA I A 1 OOO 1 000 1 OO 1001 00 OOO 1 000 1 0 

1 RO DATA t OOO 1 OO 1 1 OOOO 1 1 OOOOO 1 OOO 1 0 

1 AO DATA 1 OOO 1 O 1 O 1 OOOOO 1 00 OOO 1 000 1 O 

170 DATA 111 101 1010011 tOlOl I 11 111 11 

180 DATA 1 OOO 1 ooj 1OO101 1 OOl 11 100010 

190 DATA OOOOOOOOOOOOOOO OOOOO 1 OOOOO 

200 DATA I OOO 1 00 1 1 OOOOO 1 OOOOO 1 OOO 1 O 

210 DATA 101010O1 101 1 1 1 1 1 1O01 1O1O10 

72 O OA T A 1 OOO 1 00 1 I U OOOO 1 OO 1 00 I O 1 0 U 

230 DATA 0000000000011 101 OUOOOOOOO 
240 DATA 1 OOO 1 OOO 1 OOOOO 1 O 00 00 1 OOO 1 O 
250 DATA 1 OOO 1 OOl 1 OOOOO 1001 OOl OOO 10 
260 DATA 1 OOO tOOl 1 OOOOO 1 OOOOO 00 OOOO 
2/0 DATA 10 tOl OOO 100001 100100101000 
280 DAT A 1 OOP 1 OO 11 OOOOO 1 OOOOO 1 OOO IO 



290 C0UMT=O 

300 FOR A«l TO 26t Al=Al P*=7* ( A) 

3lO FOR B=l Tfl 26 

320 IF MID* {P*,B, l)="O n THEN 490 

3.30 B1«B*5 

340 FOR Ol TO 24lCl»CJMO 

350 01=Al+DH-Cli IF Gll>247 THEN 490 

360 FOR D-l TO 24sDl=D*10 

370 Ql-Al+Bl+Cl+Dli IF Ql>257 THEN 490 

380 IF QK131 THEN 470 

390 FOR E-l TO 26sEl«E*5 

400 01=A1+Bl+Cl+Dl+El! IF 01:262 THEN 470 

410 F =263-01 

420 IF K>26 THFN 460 

430 C0UNT=C0UNI+1 

440 IF IfMV*<>"« THEN GOFiLIB S20 

450 PRINT t:HR* f A+64) jKHR*(B+64) ; CHR4 (C+64> j 

CHR* (D+64) |CHR*<E+64) )CKR*<F+64> ; " 

| 

460 NEXT E 

4 70 NEXT D 

480 NEXT C 

490 NEXT & 

50O NEXT A 

510 STOP 

520 PRINT USING "#4tti#fHt# " ; COUNT? 

530 IF INKEY*- MH THEN 530 

540 RETURN 



ii 
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Expert's Arcade Arena 



HI folks. Once again t it's Arcade Arena 
time and this is, of course (not that I need to 
remind you, you're a trusty crowd}, the 
wonderful one year and eleven months 
birthday issue. So, to celebrate this 
prestigious and historic occasion, I am 
pleased to present this rather splendid 
Module Man map for your cielectability. 
{Here, can we have it in pen next time 
phase, your greatness ? Pencil comes off 
on the readers" fingers. ) 

My thanks to Philip Thomas for the map 
layout and accompanying notes. He must 
have sacrificed a few days' work to pro- 
duce it. 

1. The objects that can be carried are a 
yellow key, a blue key, a shield, a ladder 
and a sword. 

2. Doors labelled with numbers can be 
passed through if you carry one of the 
above objects. 

3. Doors labelled with letters can be pass- 
ed without difficulty. 

4 Once you have walked through any of 
the numbered or lettered doors, you will 
find yourself in the corresponding screen 
with the same lettered or numbered door, 
eg, should you pass through door 1 in 
screen A1 , you would find yourself by door 
1 in screen A4, etc. 

5, Doors marked by circles are one way' 
doors and only appear when you pass 
through them from the other side of the 



door. For example, door V in screen A2 can 
only be reached from door V in screen B5. 

6 There are three doors marked on the 
map which are invisible, which are: 

Door L in screen A4 

Door M in screen B4 

Door W in screen B5 
To access these doors you must find the 
ladder and drop it onto the platform above 
the door, then climb down the ladder and 
use the door as normal. 

7 On screens CI and B4, the letter I by the 
ladder indicates that the ladder is invisible 
8. The skulls which can be found distri- 
buted randomly throughout the screens 
give extra energy, though it is not advisable 
to use them 1 unless your energy is low, in 
case you should need more energy later. 



Write to The Expert' at Dragon User 
1 2-1 3 Little Newport St 
London WC2H 7PP, 



on ft r or even discover what the cheat does, 
but many thanks to Darryl Gove. 

THERE IS A SUBTLE HINT IN THE 
ABOVE PARAGRAPH! 

Well, that just about wraps up this 
month's column, except to squash in a 
Moon Crests cheat, as it seems that 1 1 came 
out gibberrrriiiiishshsh last time. Second 
time lucky, as they say. Til be back next 
month, rain or shine, when, once again, it 
will be Airbatt month. This is not only 
because it's an excellent and very popular 
game, but also due to the fact that every 
time I mention the game, I receive a dozen 
extra sacks of mail. Bye for now . . . Airbali, 
Airball, Airbali, Airbaii, Airb , . . 



Catacomb Crisis cheat 
Load the first program and once it 
runs, press the RESET button and 
type "CLOADM" to load the next part. 
Once loaded type: 
POKE &H5DFD,10 
POKE &H5E01.&H7F 
POKE &H5E44.10 
EXEC &H7608 







— 



Thanks again, Phil, and now to 
Catacomb Crisis, which is a game that I 
haven't got a copy of! So I can't comment 



Moon cresta cheat 

To load type: 
SKIPRPOKE 126,6; POKE 127,) 



Once 1 oad ed , e nte r t h e patch below and 
then "EXEC 9216". This gives 
immunity to your smallest ship. 
24351:204,1,2,142,96,68, 
237,129,231,128,32.6 

(ie POKE 24351, 204 then 
POKE 24352,1 etc.) 



MAKE THE MOST OF YOUR DRAGON 

With our great value hardware and software: 



SOFTWARE FOR DRAGON 64 

ForDmgondos (please state version) 

BASIC 42 Extended Basic £14.95 

Print on hi-rw screen, with standards priorrt commands 
using a 42 by 24 I&yi?y1 . redelinaUe charaCtersetS, windows, 
invened video, underlining, repealing keys etc. Still 23335 
byleslree to BASIC. 

Extra Utilities for BASIC 42 

HELP UTILITY £5.00 

Change cursor character, scroll disable, pause listing. 
8PEAK disaWe, improved TRQN, help and errtx messages. 



N EWf Accessories for KLIK : 

f please send disk tor updating) 
JOBS ACCESSORY 

Eaecu-lablti eommarxJ ilile CcnSKiJEive programs 

CALENDAR ACCESSORY 

19&B Calendar «r.h noies lor ho^ayselc 

DIARY ACCESSORY 

1968 Diary, wilh sfjace 1 tor u enl nes 
FiR AIMER ACCESSORY 

DefiTO. motfe, slore recall winctows 



£2.50 



£2.50 



£2 5d 



£2.50 



SPOOL UTILITY 

Use Computer wh ile pnnitng 30K piiffl buflHr. 



£5.00 



HARDWARE 

VIGLEN 40/BO track drives, inc Cartridge 
Single Ori vt (180-72 K) 
Dual 



E1BS.95 



ICONS UTILITY £5,00 

Put ksoris i n your program s! CorflinOlted by Cursor Or joysiick 
Commands todeli ne. clear load and save icon positions and 
windows. 

STRUCTUR UTILITY £5.00 

SiriJdurad BASIC on the Dragon. Allows named 
procedures, improved loop oorrtrote wilh WHILE. -WEND, 
REPEAT .UNTIL etc 

DOS UTILITY £5.-00 
Enter aJI DOS commands, plus LIST, EDIT etc by curso* or 
joystick. 

KLIK UTILITY £14,95 

Pfrini and click opwallonol 1h» entire system, will pull-down 
menus, pointer drogue box, control Duttgris and help 
messages, Includes selective directories, repeating 
comnwKls, improved editing, wiup module- Dwfciop 
accessories include a disk-based spooler, memo pad, 
snapshot, and \o:w 



SPECIAL OFFER: BASIC 42 4- KLIK £24.95 



Drives only; system price 

Add-on second d rive with ' 'data duck 1 



LESS £70-00 
£134-95 

C7S.0O 



£4.95 
£5.95 

£2.75 
1"4 .7& 



Su perdos Cartrl dge with manu a I 
S u percloe cq ntr oiler (DOS c h i p only J 
&\mk disks < packs ol 10): 

40 track double-sided 

&0 track double-sided 
Disk library twi (holds 10) 
Disk Head cleaner disk 

M ACGOWAN SOFTWARE 

For Dragon 32/64 wftfr Dtagortdos/Cumana DOS 

PRINTER CONTROL " FROM £24.95 

A lexi AND graphics processor 

DUMPER * FROM £5.95 

Versatile fo locaiable screen dump program 
COLOR PRIN T 



DISK SOFTWARE 

For Drago n 32/64 wi th 
Dragondos/Cumana DOS 

Pixie (Mindsoft) £14.95 

loon-driven drawing program . Req u ires joystick . 

DSKDBEAM (Gra&venor) 

The standard Dragon Edifor/fcssembler 

D.R.S (Grosvenor) 

Machine code database, On tape, for disk 

SOUHCEMAKER (Pameomms) 

Disassembler tar use with DSKDR EAM 

DISK-KIT (Pameomms) 

Sort out y our disk problems, errors etc. 

MONEYBOX (Harris) 

Home and small business accounts program 

MAILBOX (Harris) 



£9-95 



£8.50 



£14.99 



£16.99 



SHAREBOX (Harris} 

i— r-i — I r .- -. r ■ 



LigM^e-n software, with 



BUM 

CISCO 

PnnlS* oriented asaefnblef 

" Prices vary wilh primer: please specify 
Prices imclude UK postage. Ovemtght delivery (UK) ADD £5 
C hequesSP.O.Wurther details/dealer enquiries to: 



SALESBOX (Harris) 

Balance brought forward Sales Ledger 

B1LLSBQX f Harris) 

Balance brought forward Purchase Ledger 

CASHBOX (Harris) 

Doyble-enlry Nominal Ledger 

STOCKBOX (Harris) 

Full-foatured Stock Central program 

ORDERBOX (Harris) 

I n voici ng li nked to Sales Or Stoc k 



£19.99 



£19.99 



£19.99 



£119.99 



£16.99 



HARRIS MICRO SOFTWARE 

49 Alexandra Road, Hounslow, Middlesex, TW3 4HP Tel: (01) 570 8335 



0R73 
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Circuits on screen 

D A Craig presents a program which draws up electronic 

circuit diagrams for designers 



HAVING been interested in electronics for 
some twenty six years I have built various 
projects, all of which, of course, started off 
as a diagram on a page, This program was 
developed to help produce a reasonable 
diagram as well as help me learn to pro- 
gram using my Dragon 32. The program 
just grew as I though of more facilities to 
add and this is the result. 

The cursor is a pixel, which starts off in 
the centre of the screen; it is moved by the 
arrow keys. By holding down the shift key 
a nd u si n g t h e arrow key s t h e cu rsor j u mps 
in steps of 20 screen points, The comma, 
full stop, less than and greater than keys 
move the cursor to the four corners of the 
screen and by pressing @ the cursor goes 
to the centre. On pressing L for LINE the 
cursor move keys now draw solid lines. To 
return to the cursor press C whereupon the 
pixel reappears offset slightly from the line. 
If you need to rub out a line or part of a line 
press E for ERASE and go over the line 
again. 

There are 50 different symbols stored in 
50 strings selected by a letter A to Y in two 
groups. Also there are six wound com- 
ponents in vertical and horizontal planes in 
group 3. The size and angle of the symbols 
in groups 1 and 2 are selected by the 
numbers 1 to 4 for size and the arrow keys 
for the angle. To draw a resistor for exa m pie 
you move the cursor to where you want the 
resistor drawn, press 1 to select the group, 
press A to select the registor then press 1 to 
4 to select size and finally an arrow key to 
position the resistor in steps of 90 degrees. 
Should you make a mistake a sound is pro- 
duced and an error message appears tell- 
ing you what you did wrong and reverting 
back to the drawing screen so you can 
repeat the selection. The wound com- 
ponents are selected by pressing 3 and the 
keys A to L, again if you make a mistake an 
error message comes up. 

Wipe out 

If you find that you have drawn the wrong 
symbol it can be erased by pressing the * 
key provided no further movement of the 
cursor has been made. Otherwise you will 
have to use the large scale wipeout routine 
which is selected by first moving the cursor 
to the top right of the part to be wiped out 
Pressing CLEAR and then the down arrow 
which draws a line down the screen to the 
bottom of the component you wish to 
erase, now press the left arrow key until the 
erasure is complete. The entire screen can 
be wiped out by pressing the = key and 
following the appropriate action to the 
prompt question. 

A symbol guide is available by pressing 
the ? If you have not drawn anything the 
guide pages for all three groups appears t 
□the rwi se i f yo u have selected a grou p then 
only that group guide comes up. Group® 1 



and 2 have two pages of symbol guide, the 
second page showing by pressing N, or, if 
N is not pressed, the program goes back to 
drawing mode after a delay. 

The diagram can be labelled by the text 
routine in either vertical or horizontal mode 
by pressing T and then in accordance with 
the instructions selecting H or V. The cur- 
sor disappears in text mode but pressing ; 
shows it for a few seconds. The space bar 
gives a space in the text mode. To exit text 
press ENTER. 

After your diagram has been drawn 
pressing S starts the screen save se- 
quence. Instructions are easy to follow and 
the screen is recorded as a machine code 
file onto the cassette, 

The tricky bit 

Now comes the tricky bit. After the CIR- 
DRAW program there is a screen dump 
program on the tape and by pressing P 
another instruction page appears giving 
you the print diagram procedure. Original- 
ly I had a Basic screen dump but this was 
too slow, taking approximately 20 minutes 
to print out a screen, also it printed white on 
black which was hard on printer ribbons 
and the printout was rathersmall , so I tried 
out a program for a machine code dump 
originally written for a brother 1009 printer 
and published in the November 1987 
Dragon User. My printer is the Taxan Kaga 
810, which is Epson compatible as is the 
Brother printer refered to in the original arti- 
ele. This was much better although I could 
not append the screen dump onto the CIR- 
DRAW program, The solution I came up 
with was as described in the instruction 
page which appears on pressing R The 
screen dump program is loaded and 
autorun on pressing Q A last minute option 
to go back and check or make modifica- 
tions is gven by pressing R, 

The autorun program attached to the 
screen dump is the one published in the 
July 1984 Dragon Lteer (thank you, Brian 
Cadge). Now tor a brief explanation of how 
the program itself works. 

Lines 1 to 3 are just to facilitate an easy 
recording routine while the program was 
being developed , you may recognise them 
from the book The Working Dragon. The 
lines 10 to 300 print the introduction page, 
instruction pages and select the diagram 
load or instruction display routines. 

There are various functions available 
and these are selected in the lines 300 to 
750 by the very useful in key $ function. An 
autorepeat routine on the arrow keys 
moves the dot cursor around the screen 
with ability to jump to five different loca- 
tions, ie the four corners and the centre by 
using the full stop, greater than key for bot- 
tom and top right and comma and less than 
key for bottom and top left. The @ key is us- 
ed to bring the cursor back to the centre. 



The cursor jumps twenty screen points by 
using the shift key along with the arrow 
keys. 

Each symbol has a different letter and by 
using the letters A to Y a draw string table 
for each symbol, giving 25 symbols, is 
made up. These tables can be made up in- 
to groups to provide as many symbols as 
you require, bearing in mind of course the 
memory used. The group 1 symbols are 
compiled in the iines 750 to 1050. 

We must be able to select which symbol 
to draw so the lines 1050 to 1350 detect 
which letter is chosen and puts into Z$ the 
draw string corresponding to the chosen 
letter. The Z$ is the n used as t h e st r i ng to be 
executed in the final draw command. 

Scale and angle of the symbols are 
decided in the lines 1350 to 1550, along 
with an appropriate error trap for each 
function. While the lines 1550 to 1650 
make the necessary conversions from 
numerical values to the string format for 
the draw function. 

Lines 1650 to 2750 are just text pages 
gi ving details of what letter is what symbol 
in group 1, with thedraw strings forgroup 2 
and the group 2 letter guide. A useful trick 
is the combining of a letter detection 
routine within a delay loop giving the user 
the ability of calling up the second informa- 
tion page with a single key; if the first page 
contains the required information the pro- 
gram returns to the drawing mode auto- 
matically after the delay. 

Next come the wound components, 
such as coils, chokes, transformers etc. 



line and draw commands. Because there 
are no angle or size commands in thecircle 
or line functions these components are 
drawn in vertical or horizontal planes 
selectable by the appropriate letter. Lines 
2750 to 4550 cover the selection routine 
and error trap, the subroutines which draw 
the components and the wound com- 
ponents letter guide. 

Machine code 

That is the drawing section of the program 
complete. We now move on to the cassette 
save and load routine in lines 4550 to 4750. 
The saving of the diagram is done by recor- 
ding as machine code the memory loca- 
tions which comprise the four pages used 
in the pmode 4 display. A tape locating 
routine is provided to prevent accidentally 
erasing previous diagrams. The diagram 
you wish to save is given a filename and 
then the screen informs you that recording 
is taking place. To load a diagram from tape 
you select L when you run the program in- 
itially, or D if you wish to load a diagram 
while the program is still in use. The screen 
is cleared to white and the diagram is 
drawn as the information comes in from the 
tape. 
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One drawback with the Dragon is the in- draw anything but give a sound to indicate Keys by peeking the memory which is eon- 
ability to produce text on the hi res screen, a blank string, cerned with these keys. Once the digram 
so lines 4750 to 5900 draw the numerals If in drawing a diagram you discover that has been drawn, labelled and saved the 
and alphabet in a similar way to symbols, some parts are not correct then lines 5900 lines 6050 to the end print out the instruc- 
The number keys with shift i have used to to 6050 comprise a routine for drawing a tions for loading the screen dump program 
create special characters such as the mili, line to the right of the section you wish to will be deleted but the choice is given to go 
nano, ohm etc. These are all listed in the redo and then wiping it out. The auto back and check that everything is as you 
text information pages. Some keys do not repeat is used on the sown and left arrow want it before continuing. 



1 GOTO 3 

2 MOTOR ON: FOR D-l TO 1 OOOO : M EX t : CSAVE" CI RDRAW1 " 

3 CLEAR 200 : X=l2fi : Y=96 

20 CLS: FRI KT**C J RC1) IT DIAGRAM DRAWING PROGRAM" 

30 PRINT: PRINT** IF YOU WISH TO LOAD A PREVIOUS DIAGRAM CHANGE TO 

DATA CASSETTE AND PRESS L M : PRINTS PRINT" IF YOU REQUIRE THE INSTRUCTION PAGES D 
URING PROGRAM USE PRESS H" 

HO PRINT" IF YOU REQUIRE TO LOAD ANOTHER DIAGRAM WHEN PROGRAM IS IN USE 

PRESS D": PR INT i PRINT*" DO YOU REQUIRE PROGRAM INSTRUCTIONS ( Y/N 

>" 

50 AN*-INKEY$t IF AN*-" H THEN 50 
60 IF AN*="Y"THEN 1*1: GOTO 90 
70 IF A N $ - " K *' THEN 250 
ftO IF AN*-"L"THENil660 ELSE 50 

90 CLSt PRINT"THIS PROGRAM DRAWS ELECTRONIC SYMBOLS AT THE POSITION OF THE 

DOT CURSOR" 

100 PRINT"TO MOVE CURSOR PRESS ARROW KEYS (SHIFT * ARROW STEPS 20 > 
110 PRINT: PRINT"TO DRAW LINES BETWEEN SYMBOLS PRESS L" 

12D PRINT: PRINT"TO REVERT TO CURSOR PRESS C" 

130 PRINT: PRINT**TO ERASE SMALL PORTIONS PRESS E": PRINTING USE ARROW KEYS" 
1U0 PHI NT: PR I NT"TO SEE SYMBOL GUIDE PRESS 
150 FOR D-l TO 6000; NEXT 

160 CLS: PR I NT" SYMBOLS ARE IN 3 GROUPS 

170 PR I NT "SELECT SYMBOL GROUP<l 1 2 OR 3)" 

ISO PRINT; PPINT"SELECT SYMBOL ( A- Y > 

190 PRINT: PRINT"SELECT SCALE{l-4) 

20 0 PRINT: PRINT "SELECT ANGLE ( ARROW KEYS) 

Z10 PRINT: PRINT"*TO CLEAR LAST SYMBOL DRAWN PRESS * OR IF IN TEXT PRESS* <> 

220 PRINT: PR INT'*TO SELECT TEXT PRESS T 

230 PRINT: PRINT"TO EXIT TEXT PRESS ENTER 

2*0 FOR D = l TO 1 0000 i NEXT: IF CS4 - "H'THEN 310 

250 PMODEil;FCL5 5 ? SCREEN l t l 

300 REM CURSOR CONTROL 

310 PMODEil : SCREEN1 , 1: COLORO , 5 
320 TIMER-0 
330 CSS=INKEY* 

3fc0 IF CL-1 AND TIMER >1000 THEN SOUND 1 00 . 8 : GOTO5970 
350 S*20 

360 IF CS*-"0"THEN CIRCLE C X*il . Y ) . 6, . 1 , . 5. O 
370 IF CS*="S"THEN CIRCLE f X , Y- 4 ) . 6 . . 1 . . 2 5 . . 75 
380 IF CS* = ,t i"THEN H-li GOSUB 760:OOTO 330 

390 IF CS* = "2 1,, THEN H«2: GOSUB 2 060 : GOTO330 fl „ 

flOO IF CS$ = "3"THEN H~ 3*: GOSUB 276d : GOTO 330 * 
&10 IF CS*-"C H THEN C=l: X=X+2:Y=Y+2 
tlZQ IF CS*-"E"THEN C = l 
430 IF CSl = "L i, THEN C-Z 

4a0 IF CSS*CHR! ( 63) AND H-l THEN GOTO 1660 
*50 IF CS*=CHR* (63 ) AND H-2 THEN GOTO 2360 
ft60 IF CS*-CHR*(63)AND H=3 THEN GOTO 4350 
A70 IF CS*-CHR* ( 63 > AND H-0 THEN GOTO 1660 
i>75 IF CS*- ,T D"THEN 4660 
U&O I F CS*-' f H ,f THEN 90 

90 IF CS S ■» f, P"THEN GOSUB 60 50 + GOTO 310 
500 IF CS**"S"THEN GOSUB tt55Q:GOTO 310 
510 IF CS*="T f 'THEN GOSUB H760:GOTO 310 

520 IF CS*~CHRt(6fc)THEN X*X + 1 : Y = Y + 1 : PRESET ( X , Y ) :X-12S: Y "96 r PSET ( X , Y ) : C= 1 

530 IF CS*-CHR*{62) THEN X"X*1*Y=Y+1> PRESET ( X , Y ) : X = 2 5 5 : Y = O : PSET ( X t Y ) : C- 1 

5*0 IF CS*=CHR*(60)THEN X-X + 1 : Y«Y*1 : PRESET ( X. Y ): X=0 : Y=*0 J PSET < X , Y ) f C- 1 

550 IF CS*-CHR*(46) THEN X-X+l:Y-Y-ls PRESET C X t Y) I X-255! Y-191? PSET(X. Y) : C=l 

560 IF CS*-CHR*{ Ml )THEN X = X+ 1 : Y~Y- 1 i PRESET{ X, Y ) : X-0 : Y= 1 91 : PSIT< X* Y ) f C- 1 

57 0 TU*="ABOilCD03"i IF CS*-CHR$(6l) TH£N PLAY TUtiCLS 8 : PR I NT "ARE YOU SURE YOU WA 

NT TO CLEAR THE SCREEN ( Y/N GOTO 730 

580 IF CS**CHR*(93)THEN PRESET ( X, Y ) I X-X+ 20 ; FOP D-l TO 500 : NEXT : PSET { X , Y > ; I F X>2$ 
5 THEN X*2 5 5 

590 IF CSf=CHR*C21)THEN PRESET ( X, Y ) ; X-X-Si FOR D-l TO 500: NEXT 
600 IF X-S<-20 THENS-O: X-0 i PSETt X t Y ) I GOTO330 

6tO IF CSS«CHR*( 95 )THEN PRESET ( X, Y > i Y«Y -S : FOR D = l TO 500: NEXT 
620 IF Y-S<-30 THEN S *0 : Y -0 1 PSET ( X t Y ) 1 GOTO 3 30 

630 IF CS*=CHR*(91 KHEN PRESET ( X , Y > J Y*Y*20 : FOR D=l TO 5 00 : NEXT : PSET ( X ♦ Y ) : IF Y>1 
1 THEN Y=*190 
6ho XR*X; YR-Y 

650 X-X*f PEEX( 3^3) =2 23) -(PEEK (34 J* > = 223 ) + ( X>255 } - ( X< I } 
660 Y=Y+( PEEK(3iH)-223J-(PEEK{3ik2)-223) + ( Y>191 >-(Y<l> 
670 IF C<>2 THEN PRE5ET{ XR , YR ) 
680 PSET{X,Y.O) 

690 IF CS*-CHR*(12> AND 1=1 THENCL=1 : GOTO 5900 
700 IF CS£=CHR${ 12 >THEN CL = 1:GOTO 5970 
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710 IF CS*-"*"THEN 1600 

730 AH*-INKEY*:IF A N't - " "THEN 730 ELSE IF AN*="N"THtN 310 E LSE IF AN*="Y" THEN PC 
LS:GOTO 310 

7(10 IF AN$<>"N"OR AN*<>"Y H THEN 730 

75-0 REM SYMBOL DRAW STRINGS GROUP 1 

760 A* = ,t D5L5D?0R5ND5R5TJ20L5" 

770 B* = * t D5L5D2OR5ND5R5U2 0L5BR6F2NF2Gl4" 

760 C* = * , D5L5D10H^D5NL5D5E5PlOR&ND5F5U20L5" 

790 D* = "D5L5BD2F5ND5R5BU2L5 r1, 

fi 00 E* = "P5R5D2LIOU^R&BDUND5NR5L5* , 

8 10 Ft- w D5Hl,pNR5BD2NR5ND5L5BL2BD6ElitNtt2F2" 

820 G*="D5»L5R5BD2L5ND5L5BL2BD6E11NL2D2 M 

6 30 H* = ,, D10NG10NL10NR10F10L10ND10L10*' 

6 AO I#-"D10NR10F10L10N010L10E10L10D5 W 

3 50 J* = " t D10NL10RlOBD2L10G10RlOND10R3 OH10L1Q" 

860 KS*"R5U1 JBD5F5G5D1&SW5E5NU20O10NU5H5BU10BR5P5 

870 L.* = "D10L10BRfiBaaNL5EAR2MR10G10RlQND10RlOH10" 

680 FT* = '" t D5L5L5BP3G2NL3BE2R2G5NL2R10H^6R5NR12F5E5ML5LIOHD^ND5R ] 0 

890 N* = M P6G5NU5D2NL5D2ND5F5NU?NL2D3 r ' 

900 O*- t, D5G^NU5D2NL5D?"*0 1 tN^2F5D3 Tt 

910 P4-"D5F5NU5B2NR5DZND5G5NR2NU2D5" 

920 Q$ = H D5F5NTr5D2NR502ND5NL2a5D5 

930 R* = " , D5L5NU2P3NH2NG2NL5D3ND2R5D5" 

940 S* = , *D5L5MU2D3L5«E2NF2R5D3ND?R5D5 ,t 

950 Tt- r, P5L5NU2DLlBF5ND5L5D2BLLBU3DlL5BU5BR5DlL5 1 ' 

96O 0* ="D5NL5D4NL5D2ND4F5NU2NL2D5" 

97 0 V* = "O5NL5DilNL5-D2NDltNR2F50 5 t * 

98Q W*= M D5NL5NR5G5R5ND&R&H5BH8BG3ND2NR2F3&E3BH2NDZMR2F3 f ' 

990 Xt= ,, &5G5NU2DJlN02F5Hlr2NL^1^5BU15BLlOBG3NU^N^.^H3BE^F3NU2NL^ ,, 

10O0 Yi-"D5G5NU2DftNR2ND^F5D5BU8BL10BUaNU2NL2K3BE3F3NlJ2L2 M 

10 50 REM DRAW STRING SELECT ROUTINE 

1060 SE$ = 1NKEY* f IF SE*=r""THEN 1060 

1070 IF SE$ = " A"THEN Z* = A* 

1O60 IF SE*="B"THEN Z* = B* 

109O IF SE*-"C**THEN Z*=-C* 

11O0 IF SE1 -"D"THEN Z*»D* 

1110 IF SE$ »™E "THEN Z* = E* 

1120 IF SE* = '*F t, THEN Z* = F* 

1130 IF SE*-"G"THEN Zt-G* 

1140 IF SE*-"H"THEN Z*=H* 

1150 IF SE$="I"THEH Z**I* 

1160 IF SE*- W J W THEN Z*=Jt 

1170 IF SE* m "K*'TH EN ZS-K* 

1180 IF SE*= W L M THEN Z$*Lt 

1190 IF SE*="M"THEN Z*=M* 

J200 IF SEt-"N"THhN Z*-N* 

1210 IF SE*T ,t 0 1 'THEN Z*»0* 

1220 IF SE*="P"THEN Z* = PS 

1230 IF SE* = t, Q t, THEN Z*=0_* 

1240 IF SE* = T, R"THEN Z* = R$ . 

1250 IF SEt- f, S"THEN Z*^S* 

1260 IF SE*="T"THEN Z*-T* 

1270 IF SEt» ,, lP"THEN Zt = U« 

1280 IP SE*-"V W THEN Z*-V* 

1290 IF SE* = "W t 'THEN Z* -W* 

1300 IF SE#" W X;*'THEN Z*=X* 

1310 IF SE*="Y"THEN Z*=Y* 

1350 REM SCALE SELECT ROUTINE 

*E« YuSfiSSii KEYS 1 i S OF IMIIinOW SYMBOL SELECT PROCEDURE" 5 FOR D-l 

TO 5 OO 0 : NEXT r GOTO 3 1 0 
1380 IF 5C*="1" THEN S-2 
1390 IF SC*="2"THEN 5=4 
lilOO IF SC*-"3"THEH S-6 
llllO IF SCt- H a"THIN S-8 
lilAO REM ANGLE SELECT ROUTINE 
11160 AN$ = INKEY$: IF AN t = " "THEN Ift&O 
1*70 A»5 

11180 IF AN* = CHR* { 10 )THEN A»0*GOTO 1560 
1490 IF AM*-CHR*(8>THEN A=l:GOTO 1560 
1500 IF AN#=CHR*(94)THEN A=2rGOTO 1^60 

1510 IF AN$=CHR*<9)THEN A-3;GOTO 1560 nMF 
LS20 IF A-5 THEN SQUND1 6 , 8 : CLS 1 PRINT" ANGLE SELECT ERROR : PR I NT i 162 > PRESS ONE 
OF THE ARROW KEYS" , PR I NT"REPE AT SYMBOL SELECT PROCEDURE" : FOR D-l TO il 0O0 : NEXT : GO 

TO 310 

1550 REM SYMBOL FINAL DRAW COMMAND ROUTINE 

1560 FD* = ,i S"*STR$ (S) + "A" +S-TR* ( A ) *Z* 

1570 DRAW'CO: BM"+STR$tX)*". " + STR*< Y>*'*5 XFD*; * 

1580 FOR D»l TO 500; NEXT 

i 5 9 0 R E T V R H 

1600 DRAW"C5iBM t USTR*{X> + ","-STR*(Y) + ":XFD*;":DRAW"C0":GOTO330 
16 50 REM SYMBOL LETTER GUIDE 

l66o CLSi PRINT 9 2. "SYMBOL LETTER GUIDE GROUP l. w 
1670 PRINT &6U. **A = RESISTOR" 

$ 96. Tt B = PRESET" 
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169C PRINT P 1 3ft. " , 'C = POTENT IOMETER" 

1700 PRINT § IfiO. lf J5=CAPACITOR" 

1710 MINT 9 192. "E= ELECTROLYTIC CAPACITOR" 

1720 PRINT § 22(1 . "F^TRIMMER* 1 

1730 PRINT « "G=VARI ABLE CAPACITOR" 

l?UO PRINT e> 28 8. "H- DIODE" 

1750 PRINT # 320p "I-ZEKER DIODE" 

1760 PRINT § 332. "J=VARICAP DIODE" 

1770 PRINT £ 3Bft P M K=DIAC" 

ifiOO REM NEXT PAGE OR RETURN TO GRAPHICS 

1810 PR I NT t FRINT"TO SEE NEXT PAGE PRESS N" 

1820 FOR D*l TO 500 

1830 NS«INKEYS:IF N $<>" N " AND D<>500 THEN NEXT: IF N«O n N tB AND D=50D THEN GOTO lfij 
0 

1SUD IF N*="N"THEN CLS3GOTO1860 

1850 GOTO 310 

lS60 PRINT 9 0,"L-THYRISTOR" 

1870 PRINT » 32,"M=TR1AC W 

1BSP PRINT e 6A,"N*NPN TRANSI STOR ( FACING RIGHT)" 

1890 PRINT P 96, #l O-FNF TRANSISTOR ( FACING RIGHT) 

1900 PRINT £ 12fl + * B P = NFN TRANSISTOR < FACING LEFT) 

191D PRINT ^ l6Q> p> Q=PNP TRANSI STOR ( FACING LEFT) 

1920 PRINT g 192 + "R"FETCN CHANNEL) 

1930 PRINT ? 224, fP S«FET( P CHANNEL) 

1940 PRINT & 256 t "T=DUAL GATE FET 

195t3 PRINT £ Zfifi, "U=UNIJUNCTlON<N BASE) 

i960 PRINT » 320, TB V = UNIJUNCTION( P BASE) 

1970 PRINT » 352 + "W=L1GHT EMITTING DIODS" 

1980 PRINT & 3S4 + "X=NPN PHOTO TRANSISTOR" 

1990 PRINT 9 ftl6,"Y*PNP PHOTO TRANSISTOR" 

2000 FOR 0=1 TO *O0O x NEXT : I F H=0 THEN 2360 ELSE 310 

2050 REM SYMBOL DRAW STRINGS GROUP 2 

2 060 A*«"R3U3R10D3NR3I>3NR3D3NR3D3NR3D3L10U3NL3U3WL3II3NL^u:iBR2R2LltJ2Gl >1 

2070 B* a "R3U3R10D3NR3J>3flR3D3NR3B3N 

3tT3NL3U3BR2R2LlU2Gl fB 

2D30 C$ = ,, R3[J3R10D3NR3D3NR3D3NR3D3NR3D3NR3D3NR3D3WR3D3NR3D3L10LT3NL3U3NL3U3NL3U3 
3U3NL3U3NL3 P J3NL3U3BR2R2L1U2G1" 

2 090 D*-"R3U3R10D3NR3D3NR3D3NR3P3NR303NR3D3NR3D3WR31>3NP3D3NP3D3L10U3NL3TJ3N 
3U3NL3LJ3ML3U3NL3rJ3NL3U3NL3U3BR2R2LlU2Gl" 

210D e$ = "R3U3R10D3NR3D3NR3D3NR3D3NR3D3NR3D3NR3D3NF/3D^ 
3U3NL3U3NL3U3NL3 B J3NL3U3NL3U3NL3U3NL3U3BR2R5L1U2^1" 

2110 Ft^"R31J3R10D3NR3D3NR3D3N«3D3NR3D3NR303NR3P3NR3D3NR3D3NR.303NR3D3NR3D3L2 0 
3U3NL3Q3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U , 3NL3U , 3BR2R2L1U2G1" 
212 0 G*= H R3U3R10D3Nft3P3NR303Wfl3D3W*3D3N 

OU3:NL303NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3Lr3NL303NL3U3BR2R2LlU2Gl" 
2130 Ht ■ "R3U3R1 0D3NR3D3NR3D3NR 3t>3NR303NR3[>3NR3D3NR 3D 3NR 3D 3NF 3D3NR3D3NR3D3NR3D3N 
3J>3NR3D3L10U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U3NL3U 
3U3BR2R2L1U2G1" 

21*10 I S ■• "R3U3R1 0D3NR3D3NR3D3NR3B3NR3D 3NR3D 3NR3B3NR30 3NR 3l>3NR3P3NR 3D 3NR 3D 3 N R 3D3N 
3D 3NR303NR3D3NR3D3NR3D3NR3D3NR3D3NK 3D 3L1 DU3NL3LJ3N L3U 3N L3U3NL3U3NL3U 3N L3U3N L3U3N 
3U3NL3U3NL3U3NL3U3NL3U3»L3U3NL3U3NL3U3ML3U3NL3U3NL3U3NL3U3BP2R2L1U2G1 TP 
21 SO J t = M G5NU2DilNF5DaL5UflR5" 
2160 Kf -"D5L5D3R5ND5R5 | J3L5" 
2170 L*- tp F2G2NUHD4BR6!J8G2F2" 

21S0 M*= w F2G2NuaNo6eRfirtessr*Diorzs2SB4Hafi2Dici" 

2190 N*«"D5L3D6R3ND5R3U6NL3G6U6F6" 
2200 0*="R5BU2L2R3tr3NLlNRlD3R3BD2L2R5 
2210 P**"R2E2BD2R5" 

2220 Q*="H3HDlMRlBL2UlLlDlRlBR10UlLlDlRl* fc 

2230 RS*"H3NDINR1BL1U1 LlDlRlBUftBRftUlLlDlRlBDUBRilUlLlDlR 1 
22H0 St ^ "H3ND1NR1B L2U1 LI D1R1 BU4 BR AU 1L1D 1R 1BR4-U1 LI D1R1BDABRAUI.L1D1R1 

2250 T*- n H3NDlMRlfiL2tJlLlDlRirdU2SR2UlLlDlR]LBU2BR2UlLlDlRlBRXiULLlDlRlBD2BR2VlLlD-l 
1BD2BR2U1 LIDIRI" 

22&D IJ$ = >+ D3NH1NE1BD3BL1U1L1D1R1BL2BU1UIL1D1R1BU2BL2U1L1D1R1BU2U1L1D1R1BU 
DlRlBU2BR2UlLlDlRlBUlBR2UlLlDIRiBR2UlLlDlRlBDlBR2UlLlDlRlBD2BRlUlLlDlRIBRlBD2Ul 
1D1R1BD2U1L1D1R1" 

2270 V*-"R5U5R10D5NR5D5L5BH£IND1NR1 FHL5"J5" 
2280 W* = "D5ML3ft3SR2&DlLlOC^ER10NlJ^BDlBL^L3ND5L3 T,, 

2290 X$ - M BU12F5NE2NG2D iiE4 Lil BF2F 5G5NH2 NF2LJ* FliUJiBG 2G5H5 E2 LAlDHE2BH2NE2NG2H5E5F2UJiL 
F2BE2NH2NF2E5" 

2300 Y*="D3NH3NE3D5" 2fJ10 PRINT t PR INT"TO SEE NEXT PAGE PRESS N" 

2310 GOSUB 1060 2520 FOR D=l TO 500 

232G GOTO 330 2530 N*=INKEY* : IF N$<>"N"AND DO500 THEN NEXT; 

2350 REM SYMBOL LETTER GUIDE 2 IF N*<>"N"AND D-500 THEN GOTO 2350 

2360 CLS: PRINT £ 2 . "SYMBOL LETTER GUIDE GROUP St.:* 25*10 IF NS~"N" THEN CLSsGOTO 25*0 
2 370 PRINT $ 6ft. l *A«eiGKT PIN I + C + * 2550 GOTO 310 

2380 PRINT 0 96 P "B- FOURTEEN FIN I.C." 2560 PRINT p 0, "L-SIMGLE POLE RELAY CONTACTS* 1 

2390 PRINT i 128. "C*SIXTEEN PIN I.C." 2570 PRINT g 32, "M = DDUEJLK POLE ft E LA Y CONTACTS" 

2*100 PRINT f 160 B "D= EIGHTEEN PIN I*C* tP 25&0 PRINT g 6U « "N =TR ANSMISSION GATE" 

2&10 PRINT g 192 , "E=TWENTY PIN I*C+ W 2590 PRINT P 96^ Ti O=PUSH TO MAKE SWITCH" 

2ft20 PRINT & 22A* f, F-TWENTYTWO PIN I.C." 2*00 PRINT 9 128, "P-3INGLE POLE SWITCH" 

2*30 PRINT » 256, tp G- TWENTY FOUR PIN I.C." 2610 PRINT @ 1 60 , "Q=S > P > D > T > SWITCH" 

iftAO PRINT § 288* **H*TWENTYEIGHT PIN I.C* 2620 PRINT g 192,"R»ONE POLE THREE WAY SWITCH" 

21150 PRINT 9 320,"I-FORTY PIN I.C. 1 * 2630 PRINT @ 224 f "3-*ONE POLE FOUR WAY SWITCH" 

2H60 PRINT & 3i2, "J -LOUDSPEAKER" 26&0 PRINT 1 256. "T-ONE POLE SIX WAY SWITCH" 

2470 PRINT i 384«"K=RELAY COIL" 2650 PRINT % 2S& B "U=ONE POLE TWELVE WAY SWITCH" 

2500 REM NEXT PAGE OR RETURN TO GRAPHICS 2660 PRINT f 320, "V-METER" 
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2670 PRINT @ 3$2,*W=CRYSTAL" 
2680 PRINT # 3 aU."X-BFJDaE RECTIFIER 
2690 PR I NT « 4 1 6 , " Y= ANTEN N A" 

2700 FOR D-l TO 5 000: NEXT: IF H-0 THEN 4350 ELSE 
27 50 REM WOUND COMPONENTS SELECTION ROUTINE 
2760 W*-lNKEY*tIF W*=""THEN 27&0 

2770 W-ASCCWf):tF W<6 5 OR W>7 6THEN CLS ! SOUNt> 1&.S. 
PR 1NT"SE LECTION ERROR**: PRINTS 162, "PRESS A TO L , : 
PR I NT" REPEAT SELECTION PROCEDURE" : FOR 0=1 TO 4000* 

NEXT t GOTO 310 

2780 IF W*65 THEN GOSUB 2900 : GOT0330 
£790 IF W=66 THEN C.OSUB 3000;GOTO 330 
2800 IF W=67 THEN GOSUB 3100:GOTO330 
2810 IF W-68 THEN COSUB 3250:GOTO33O 
2820 IF W=69 THEN GOSUB 3350: GOT0330 
2830 IF W-70 THEN GOSUB 3^50 i GOTO330 
2840 IF W-71 THEN GOSUB 3550:GOTO330 
28 50 IF W=72 THEN GOSUB 3700:GOTO330 
2S60 IF W-73 THEN GOSUB 3^501 GOTO330 
2870 IF W-7U THEN GOSUB 3950:GOTO330 
28SO IF W=75 THEN GOSUB 40 50 : GOTO330 
2890 IF W-?6 THEN GOSUB 4200:GOTO330 
2900 REM COIL SUBROUTINE 
2910 I =X - 2 J J =Y * 7 * PRESET ( X ► Y ) 
2920 FOR L-l TO 3 

CIRCLE (X, Y) r 3# » It -7S» - ZS 



29il0 CIRCLE ( Ii J > t 3* » 1+ * 2 5* * ?5 



2950 
2 96 0 
2970 
3000 
3010 
3020 
3030 



J-J+12: Y=Y*12 

NEXT L 
RETURN 

REM COIL SUB ROUT IN EC HORIZONTAL) 
I = X + 7i J-Y + l: PRESETCX. Y ) 
FOR L-l TO 3 

.1. ,5*0 
.1,0.-5 



CIRCLECX, Y),3 
3040 CIRCLE { I* J ) , 3 
3050 1=1+12 : X=X+12 
NEXT L 




♦ 75* - 25 
» 1 , . 7 5> « 
P 25. . 75 
, 1 , .25. 



2 5 



7 b 



1 

1 



REM AIR CORED TRANSFORMER 

I^X-l! J=Y*7? PRESET (X. Y) 
FOP L-l TO 3 
C I RCLE C X , Y ) . 3. . 1 
C1RCLECX+10, Y ) * 3 

CIRCLE ( I , J ) t 3 ■ ■ 1 
CIRCLE( 1+ 10, Jl.3 

3170 Y-Y+12 
3180 J=J+12 
319 0 NEXT L 
3200 RETURN 
32&0 REM AIR 
3260 I-X*7tJ 
3270 FOR L-l 
3280 CIRCLE ( X , Y ) ♦ 3 , 
3290 CIRCLE! I , J )« 3. 
33OO CIRCLECX. Y-10) . 3. 
3310 CIRCLEtl. J-10), 3* 
3320 I-I*12tX=X*12 

3330 NEXT L 
3340 RETURN 

3350 REM FERRITE CORED COIL 
3360 I-X-liJ-Y*7: PRESET ( X , Y ) 
3370 FOR L=l TO 3 
3380 CIRCLE<X„Y) ,3. * 1» •■75* '25 
3390 CIRCLE ( I . J ) . 3. . 1 . ■ 25 . ■ 75 
340O J-J+L2: Y=Y+12 
3410 NEXT L 

34 2 0 DRAW M SXlJ AOs BM"+STR*tX-l ) 
": BU6U2SBL8BD22E16NL3D3: " 
3430 RETURN 

3J150 REM FERRITE CORED CO I L ( HOP IZONTA L > 
3460 t*X*Tt JI"Y * 1 ; PRESET t X , Y ) 
31170 FOP L-l TO 3 



COPE TRANSFORMER (HORIZONTAL) 
Y*l : PRESET fX, Y ) 

TO 3 * 

5.0 

. . 5 

1.-5,0 
1. 0* , 5 



+ » «*sTR*< Y) 



. 1 

. 1 



. 5. 0 

0. . 5 



CIRCLECX. Y) . 3. 
3*90 CIRCLE { 1. J) .3. 
3500 I-I+12SX-X+12 
3 510 NEXT L 

352 0 DRAW"S4; AOt BM" *STR* C X ) + " . M *5TR*< Y) + 
"} BL6L28BD8BP4ai6NL3D3; " 
3530 RETURN 

355 0 REM I . F. TRANSFORMER 
356O I=X~1 ; J= Y+7; PRESET ( X , Y ) 
3570 FOB L-l TO 3 
3*^80 CIRCLECX. Y) , 3. . 1. - 75. . 25 
3590 CIRCLECX* 12. Y ) « 3, . 1 1 » 75* 
36OO CIRCLECI. J)t 3. .1* ' 2 5. -75 
36IO CIRCLEC 1 + 12 . J ) 1 3. ■ 1 • ■ 25* 
3620 Y=Y*12 : J-J*12 



25 



75 



3630 NEXT L 

3640 LlNECX-i-5. Y-2)-(X*5 > Y-3B) , PSET 
365O DR AW"S4 s AO i BM" *STR* C X-7 ) *" . " +STR* C Y-7 ) * 

"; E24NL303: " 
366O RETURN 

3700 REM I - F . TRANS FORMER C HORIZONTAL ) 
3710 I-X*7: J-Y+l : PRESET (X. Y ) 
3720 FOR L=l TO 3 
3730 CIRCLE<X,Y)*3. .1* . 3.0 
3740 C1RCLE(X.Y-12)«3, , 1* ♦ 5. O 
3750 C IRCLE C I ■ J ) » 3 <■ .1.0, .5 
3760 CIRCLEC I , J-12) , 3. . 1» 0, . 5 

3770 1-1*12 I X-X*1Z 
3780 NEXT L 

3790 LINS(X # Y-5)-CX-38.Y-5).PSET 
3600 DRAW"S<t : AO : BM" * STRt ( X- 36 ) +" . " +STR« ( Y* 5 ) * 

"j EZ6NL3D3:" 
3810 RETURN 

3850 REM IRON CORRED CHOKE 
3860 I-X-li J-Y+7; PRESETCX, Y) 
3870 FOR L»l TO 3 
3&8O CIRCLECX, Y ) . 3. , 1 + ■ 75 . . 25 
3890 CIRCLE CI, J) . 3. ■ 1, * 25. - 75 
3900 J-J+12* Y-Y+12 
3910 NEXT L 

3920 LINE(X-l,Y-6)-(X-l,Y-3*>. PSET 
393O RETURN 

3950 REM IRON CORED CHOKE ( HOR120NTAL ) 
396O I-X+7 : J»Y*i s PRESET ( X, Y ) 
397O FOR L-l TO 3 
39SO CIRCLE(X + Y)*3r , lw ■ 5. 0 
3990 CIRCLE<I, J> . 3. . 1-0* • 5 
4000 1-1 + 12 £ X-X + 12 

4010 NEXT L 

4020 LINECX-34,Y~1)-<X-6*Y+1) . PSET 
it 030 RfcTUPN 

40 50 REM LOW FREQUENCY TRANSFORMER 
ao60 I-X-l: J -Y+7: PRESET (X, Y) 
4 070 FOR L-l TO 5 
4080 CIRCLE (X f Y)«3< .1. .75. ■ 25 
4090 CIRCLE { X* 12 . Y ) . 3. .1. -75, .25 
4100 CIRCLEC I « J ) . 3. . 1 * « 25, . 75 
4110 CIRCLEC 1 + 12* J ) 1 3. . 1* ♦ 25« - 75 
U120 Y»Y+12: J*J+12 
4130 NEXT L 

4140 LlNE(X+5*Y-2)-CX+5.Y-5a). PSET 
a 150 RETURN 

4 2 00 REM LOW FREQUENCY TRANSFORMER ( HORIZONTAL J 
4210 I-X + 7! J-Y + ls PRESETCX. Y ) 
4220 FOP L-l TO 5 
4230 CIRCLECX, Y) , 3. . It * 5* 0 
424D CIRCLECI. J> + 3« *1.0* * 5 
4250 CIRCLECX. Y-12) . 3. . 1» ■ 5. 0 
4260 CIFCLEU, J-121.3. .1.0. ■ 5 
4270 I-I+12:X-X+12 
428U NEXT L 

4290 LINECX-58* Y-5)-CX-6. Y-5) . PSET 
4300 RETURN 

A350 REM WOUND COMPONENTS GUIDE 
4360 CLS: PRINT TAB(S) "WOUND COMPONENTS" 
4370 PRIBTS32. **A»COIL (V)* 
4380 FRlNT§64 t t'B-COIL CH)" 

4390 PRINT#96 * "C-TRANSFORMER ( AIR CORE) (V) 
4400 PRINTf 128, "D-TRANSFORMERCAIR CORE) (H> 
4410 PRINTS160,"E-COIL( FERRITE CORE) CV)« 
4420 PRlNTil92»"F-COIL(FERRITE CORE) Oil 
4430 PRINT#224, "G- I. F. TRANSFORMER (V)" 
4440 PRINT«256 , "H=I ■ F. TRANSFORMER (H) 
44 50 PRIMTfZBS. "1 -CHOKE <V) M 
44 60 PRINTS 320 . "J -CHOKE ( K ) '* 
4470 PRINT&352, "K-L. F, TRANSFORMER 
11480 PR1»T*384 t "L-L* F. TRANSFORMER 
4490 PRINT" A BRIDGE OVER WIRES IS 
WITH 8 FOR (V) OR 0 <H) 
4 500 FOR D-l TO 6000 : NEXT 1 GOTO 310 
H 550 REM CASSETTE SAVE ROUTINE 

4560 CLS2t PRINT « 32." SAVE DIAGRAM TO CASSETTE 
4 570 AUDIO ON: MOTOR ON 

4580 PRINT: PRINT" POSITION TAPE READY TO RECORD 
( m0t0 r and audio are on)": PRINT; PRINT" 
PRESS enttr WHEN READY" 

4590 R*-1NKEY*:IF R*<>CHR* ( 1 3 ) THEN4 590 
ELSE MOTOR OFF 

4600 PRINT: INPUT" FILENAME C 8 CHARACTERS MAX) 
n 5 N A* : MOTOR OFF; PRINT J PRINT" PLACE RECORDER IN 
RECORD MODE": FOR D- 1 TO 10000: NEXT: CLS 3: PRINT 
f 32." TO START SAVING "tNA*£ PRINT f 6^." 
PRESS S" . 



(V)" 
( H ) " 
DRAWN 
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il 1 J™ 1 

UolO 


an ■>« t ■ 1 t tt 1 r a ,■ am w' tmi ma jpjjjl _ _ "IF ."^n 1 1 P 1 ™ 1™™ 1 1 ■ jl * _■— _ 

3$-INKEYS : IF 5*<>"5"THEN si&lO 








il l J^' JKJL mmV 


IF 3*= M S M THEN lLS 4: PRINT # 32," SAVING ";NA* : FOR D-=l 


TO200O: HEX 


■ MB 

T 




4630 


CSAVEM NAt. 1536. 7679, 1536 








ft 640 


RETURN 








4650 


REM CASSETTE LOADING ROUTINE 








H660 


CLS 3 








4670 MOTOR ON t AUDIO ON: PRINT « 160.*' POSITION TAPE READY TO LOAD 


{ motor* 


an 


d audio are on) THEN PRESS *nt*P H 








4680 


TS-INKEY*:IF TtOCHfit < 13 ) THEN a680 ELSE MOTOR OFF : AUDI O OFF 








4690 


FOR D«l TO 1000: NEXT: CLS 3 : IN PUT" FI LEN AME OF DIAGRAM REQUIRE 


D +fe ;NA*; 


CLS 


3 ♦ PR INT 9 1*0*" LOADING f ' ; NA$; FOR D= I TO 1 000 J NEXT : PWODE 0 : PCL5 




sc 


REEN 


1 T 1 1 C LOADM NA* 








4700 


QOTO 310 








4750 


REM TEXT ROUTINE 








4760 


CLS 7: PRINT f 32." TEXT ROUTINE'* : PRINT fi 96," 


SELECT VERTIC 


AL <V) OR HORIZONTAL (H) PRINT' 1 'N--6 








4770 


CT*-INKEY*: IF CT*«""TKEN 4770 








A780 


IF CT*«"H"OR CT*-"V"TtiEN 4790 ELSE PR INT'*I NVALI D INPUT PRESS 


J e r K j— i. n i" ■ r V 

f H ) OR ( V) 


PI . 

■ la 

r 


J"~l BB~T- 

GO 


TO 4770 








Il T rff% 

« 790 


SCREEN 1 > 1 i PRESET ( X. Y ] 








Ji D nn 


r-r r-r ju, T U V TZ* "JF f . T C Silt TU C U ti Q JTh n 








4 a l u 


urr # _ it p ■ ^ uirs ^ fi A i i d-^i i th '* ■ t w 99* ti" + tp rr« u u *■ *? *7 _ m t t 

NLT »■ UJIfuliJOLlKcLlLrj Sir ZZ| * X INlK ZlIbNUI 








Ail Hi 
Ji Qcn 


nU*v lIcU Lit DU JJX± IL 1 U 1 ft 1 La i IS P .t .J_r c: 1 El JL N ZiZi*-rtU* 
purr* — ,r 07 f 1 n "i n 1 l iui bttJi d'svi m hi t 1 w * t w t t * — 11 t b ^ t -1 w it w r ? r r*— wn* 

pillilH^iaTi n^TTAfZ'a IM B 1 nnrn tip 77* H ff/lflTKFU 7 7 t ■ WFT* 

ny^-m sriUcUOwijLJli\4L£fiUl I IT U in&JV i!. jl- * r« 'J » 








Ji ft fift 


HUf « LrZK Jr 1 □ lLrl LZ Ell LT^E. R 1 LIBUJ i lr ZZ|= Q THEN ZZS=HU¥ 








Ji fl 7fi 

u o- / u 


HU1-- ^IflDtfi JiUlij^KcDU'^S . If / 2 ntn ZZ( B PIU* 








ih dan 

4 o fly 


Nul ■ LlulUlKlKiELlUlHlL^nlUlfilKZrlDiy iLl ! If ZZI* O I HfiH ZZ# H 








Ji fl a fn 
"4 a □ 


irrr#_ ^b-^f -sui tii cr i □ n tti r\ ra- j-* ^ t 4 B| fl tf 4 W * ter rr t * _ »■ n " tu tt u 4 - ml* 

nu|= i«jn 1 U LfiXnS r 1 L>3G*T LI R IBUj Jlr E?l= 9 THKP4 £S¥ K liW 








Jl fl 1*1 


WU¥» QZF iRZElUti N<j2H1 L2Q1D4E2 3 IF ZZI* 0 THEN ZZI'-Nul 










A*= T Li?D3U5EiRil!rlD2rfD3Lc"3 IF ZZ**"*^ THEN ZZ* = A$ 








Jl AHA 


Tj * Tt T i 111 I Ji n ■ j 1? 1 Pi j-£ 1 T OI^TiT 1 lit U1 1 1 fl* TV n <7 A — It D It-T 1 ■ r TT M 774 x ll# 

B»» LlUjLlR3FlDlGlL?OjLlRjIlUlnlLl : IF ZZI» B TrltPf ZZj»»B* 








Jl A4A 


C¥* BE2H !L5GlI>fA F1R2 El pHS* : IF ZZ*= C THEN ZZ|bC| 










D*«"BL2U3RZF2D2GZL?U3BR2"5 IF ZSt-"D fp THEN ZZ* = D* 








£1 950 


E*-- R 1 L3 DjRtiBiJoLtiD 3K 2 : IF ZZf - E THEN ZZ#"EI 








li j£ 


C* tP n ■! r TrnTT A □ Jl 1 ■*3Crv J 3' , 'i TIT 7^*_tt[Jl^» ^ ^■J■|=■fc■ 77* _ Ft 








Jl rV T 


#i ttBffAiii 1 ■^K^Tfiii'ffiO i^-IT 4T 1 D U t ■+ ■ T IF f? ^ # _ tt/2 ItrruUH 7 7 # _ /I * 

La * - flEiHlLifilDllFlKjUiLl oil JL .XF A £, 3 = u X H J5-J1 Z- ji^ 3 = "Li -> 








4 y G L 


U# _ > ' r "I" l"i IHBi 1 ! TTfiBI Jl r,, n □ Jl T «T- It . TIT 774-— -ttuffrrri-JIfM ?7*-tft 








Ji n. n, iTi 


T # _ W PH T 1 D O C3 Tl £. 1 TO 1 T~i, T ■! ^ T TP — Pf T If T IJ t" M 7 — T 

I * m D3L1RZBU6L2R1D3 Sir ZZI" I THEn Z-Z-*^!* 








5 0 OO 


T * B t TJ j - * OE ^ D1V1TTC.D1 1 d r*i, *!! It" ■ TUF n n # It 1 ft TUH U 77n» T* 

JI« BQ2F1R1E1U5R1LZBD3 :IF ZZI* J THEN ZZI-JI 








am —fa. .1 


K*-"BL1E3BD6H3L1U3D6U3BR2" : IF ZZS - K THEM ZZ«*K* 










L*="BL?a306R*L2BU3" i IF ZZ*="L"THEN ZZ*=L$ 








M™ ■ ■ ■ B™1 

5030 


M**"U1H2D6BRHU6{32D1* , b IF ZZS- ,f M"THEN ZZS-M* 










Nt*"H2UD6BRilU6D5H2 tp i IF ZZt- *N *TKEN ZZ* = ff* 








5050 


0*» w BH2ElR2FlDU<llL2Hilf^BF2" : IF ZZ* - "©"THEN ZZt-O* 










F*- w L2D3U6R3FlDlGlLl"t IF ZZ* - M P"TH EM ZZ*-F* 








5070 


J mmm m dL If 1 ■ m * mH ma n 1" -J™t W 1 J^Jm ■ 19 ■ ■ mmm ■ . ^f- mm amm m\ Jl Tl Jl — J J V% TP II '"■™ n m H JL 14V m""** 1 4 m ■ ■ ^t"*" "VI J9 mm F W ma m m MMa m maa >mt mWm 

Q*- w BDlF2BL2E2y3HlL2QlDiUFlRlBU3" s IF ZZ( * ,t Q"THEN ZZ4-Q* 










n JL- l-B n 4 1 ■— . tv ■ i . ■ ■ .— _ _ . 'm n mi ■ ■ mik u a mi ■ mTPJ. h mVl pa. jl || ipn ■■ mm mm _ a M._ | d- ul | # >JfPBi ■ ■ n ■■ ■ n jrp _mU_ j— s. —u 

R*«"LlF3BLti.U3R31iUiHIL3D3R2" : IF ZZ>= *R THEN ZZt = Rt 








f A. rt. A. 
5090 












T*»"D3U6L£R^L2D3" i IF ZZ*- ,f T"THEM ZZ*-T* 








511Q 


rr A ■■ n t — r - nnn Ii n rn i t n n t m i i .— . i— . i— . .— . II t t-i i-« i-b jb. II t t II ritt bt- bt r-rr-rJB. - - - 

LT ♦ = B L EfU 3 BR 4 D 5 Q 1 L2 H 1 U £ B R £ : IF ZZS-"U"THEN ZZ**IF* 










I 1" . K. | 1 Tl F", ,n, p T"« . JH P™ JB 9" 9' Jfi Jl "BBi : m mma m P™- ■ 1 ■ P"™ Jfl P^ J BTi™ mI mI P P J". 1 "1 ™F «■ h m .^l 4 'P 1 ' J 1' fa PJP1 ■ ■ IP! H_ ,1 JFWI PI mW ■ JT jfa> 

V*» ^BD£NDlElUlElTj r £BL4D2FlC)IFlBU2 M : IF ZZ*» W V"THEN ZZ*»V$ 








5130 


W*-"DlF2U6BL*lU6l2Ui fl s IF ZZ*- l|! W B *THEN ZZ**Wf 








514a 


X** lt E^ , UlBLADlF4DlBL4UlE^ ,l ' : IF ZZ* ™ ^X'^THEM ZZt-Xt 








5150 


1 I" JB. II |P » n m mhb mi i mh ■ bmb m ■ 1 1 T WWZ WM PI JL || | P II ppjg T T W" M. 1 PJ P"JJ JfL V ■ JBL 

Y *-"E2UlBLaDlF2ND3 fl s IF ZZ*""Y"THEN ZZt-Y* 








pjjjjr jF ja- 

516Q 


mL 1 mm* mBb ■ ■ J ■ fv UJJJL. Pm mmm JL J™ _ J ■ mm -m mmi mmi ■ ■ mWk mWM PJJJJI flBJI mIm 1 A ■ i 1 fjk BJJJJjy ■ ■ ML B In BmI BJJM- JL iflH Jk 

Z* = '*E2U1 L4RftBDoLAUlE2" ; IFZZ *= Z ^THEM ZZ* = 2* 








5 20 0 


REM SPECIAL TEXT SYMBOL STRINGS 








5-210 

h m mmm ■■■> 


SP* a ="BU3 , 32D2F2BU3 tl = IF ZZ* = lf < "THEM ZZ* = SP* 

MB MM. Mi ■■ MM M M- V MB MM MM MM MMB MM MMB M M MM ■ ■ MM MMM MB MMM JL| ■■ 1 ■■ MMM M M MB M ■ MM MMM MB MBM IMJ MB| 

SP*- f, BU3F£D2G2BU3": IF ZZ*- M ) !f THEM ZZ*=SP* 








52 30 


MI ___ M II _ ___ __ ___ _ _ _ ___ MMM. — MB JM-_ JL ■ Mi MMM JM MMB _BM_ ■ J ■ J _ _ _ ,-, MM. MM. — 

SP*" L2BF2U4BF2L2 i IF ZZt-"+ w THEN ZZ»-5P* 










■ ■ m—. -d*. Pi ■ — < ■mm— j. a -Jk. M _ jb mmm. mmm m jl «■ hi jamm, mi . n L ■ n pg ^ jji-i a-- ^_ 

SP» « f L2R«i L? : 1 F 2ZS = "-"THEN ZZf«SPS 








5250 


SPt = " L2R1 L2BU2U1BD " : IF ZZ* = < */'*THEN Z2*=SP* 








5260 


SP*- H NGZNFZNE2NHZ H i IF ZZ* - , ** ,, THEN ZZ* = 5P* 








5270 


SP*»"BR8' + : IF ZZ*-CHR* ( 32 )THEN ZZ*-SP* 








52&0 


SP*-"R1" : IF ZZ*«CHR* ( 46 ) THEN ZZ*-SP* 








5290 


SP*»**BLlBD3U4BR4&aLilQ2 M : IF ZZ* - '* ! "THEN ZZt-SPt 








5300 


SP* = "BL1 DSBRJUSHI LIGIBRI*' : IP ZZ* =CHR* ( 3<l ) THEN EZ*=SP* 








5310 


SP#- W BL3ND3E1R1F1ND2E1R1F1D3" : IFZZ*- , *£ ,, THEN ZZ*-SP* 








5320 


SP*« M BD2BL6R202E2R2F2D2R2 H ! IF ZZ*-'**"THEN ZZ*-SP* 








5330 


SP*« "DZG2D2F2D2" J IF ZZt-'^^THEN ZZ*-SP* 








5 340 


SP* = ,, U1E2R2F2DSF2R312U2"; IF ZZ* = "A'^THCN ZZ*-SP* 








5 350 


SP* = "BR6BD2R2UftR3DftRZ": IF ZZ* - " » "*THEN ZZ**SPt 








536o 


SP*- H EflL3F3tr3'*: IF ZZS*CHR$ (.95) THEN ZZ*-SP* 








5370 


SP*- M H6R3G3U'3 ,t : IF 22* =CTHR* t 2 1 J THEN ZZ*-SP* 








5380 


SP* = "U1 jG3RaH3' T : IF ZZf^CHR* ( 9"<l ) THEN ZZ* = SP* 








5390 


SP*-"1>11H3R6G3 W J IF ZZ*-CHR* ( 10)THEN ZZ*-SP* 








5100 
54lO 


SP4** , L11E3D6H3'*J IF ZZt-CHRi ( S ) THEN ZZ*-SP* 
SP* » "Rl 1H3D6E3** : IF ZZ*-CHR* < 9 ) THEN ZZ*-SP* 








9**0 


SP*-"OflU3F3L3": IP 22*=CHR* (91) THEN ZZ*=SP* 








5430 


SP*="FaU303«3"i IF ZZ*-CHR*C93)THEN ZZ*=SP* 








5440 


SP*- H BDEBR2E3F3E3F3": IF ZZ*-"I« M THEN ZZ*-SP* 








5^50 


SPt « "BUI L2R11BD2L4R2BU 1" : IF ZZf -"THEN ZZt«SP* 








5460 


IF ZZ*«":"TKEN SOUND 18,6; SOUND l,&:GOTO HflOO 








5470 


IF ZZ*-CHR* ( 12 }THEN SOUND lfl.fl: SOUND 1 , fl : GOTO ilflOO 








5430 


IF ZZ*= H ,"THEH SOUND 16 , 8 : SOUND 1,8: GOTO flflOO 








5490 


IF ZZ* - " ; "AND CT*» W H"THEN PSET(X+N + it. VJ : FOR D-l TO 5 00 : NEXTs PRESET ( X+N*ii , 


Y) 


zOOTOiiSoo 
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IF ZZ*=":"AND CT* = "V"TH£N PSET { X . Y + N + 3 > I FOR D-l TO JOO : NEXT : PRESET { X , Y + H+ fl 1 

: goto aaoo 

5510 IF ZZ*=«?"THEN GOSUB 57 10 : ZZ»- CHR* ( I 3 ) 
5520 IF ZZS-CHRt (13) THEN N=-6 : RETURN 

5530 SP#="BL4&D4UBRSDi L&D1R8D1 L&D1R8D1L3D1 R3D1L8D1R8" : IF CT*-"V" AND ZZ*-"<"THEM 
ZZ*-SP* ; GOTO 5*50 

5540 SP* «"BL4BU*l D8R1U8R1 D8R 1U8R1 D8R1U8R1 D&R1 U8 f " J IF CT*-"H" AND 22*-"< "THEN ZZ*-5 
P*:GOTO 56 30 

5550 SP$ = " H L5 BU^Rl 2 Di 0L1 ?U 1 O BD2 BK2 K2 N D6R2 BR2ND6R 2 F1D1G1 L2 " : I F ZZ*-">"THEN ZZf-SP 



5560 

5570 
5580 
5590 

5600 
56lo 
5620 
5630 
56ao 
5650 
5660 
5700 
5710 

fcJO Li S " 

FOR D *1 TO 50*00: NEXT: CLS 
57 30 PRINT: PRI NT"MICRO : NANO: MILLI 

SQUARE WAVEFORM: OPEN BRACKETS 
^7^0 PFINT"TTiE- ARITHMETIC 5 



N«N*8;IF CT*-"V"THEN 560O 

IF X*N>250 THEN X = 2 S B=0! V=Y+fli SOUND 200, l6 
DRAW'COjSil; AO; BM"* STR* < X*N > * 
IF CT* = '*H ,t THEN GOTO 4800 
IF Y+N>185 THEN SOUND ZQdIb 
DRAW "CO! SU ; AO; BM"*STR*( X ) * " 
GOTOilSOO 

IF SGN (X+NJ--I THEN X-250;Y 
DRAW'CS:^; AO; BM" ♦ STRS ( X * N } * 
DRAW M C5:Sa : AO: BM"* STR* ( X > * " , 
FOR D-l TO 5000: NEXT: RETURN 
REM TEXT INFORMATION 

CLS: PRINT g l6o,"THK NUMBER KEYS USEP WITH SHIFT KEY DfiAW THE FOLLOWING SYM 



" "-STF*( Y>*": y.7.7,% ; " 



t RETURN 

,"*STRS( Y*N)*" ;XZZ% : " 
-y-6i N-0 

" p "+STR* ( Y > *" ; XZZ4 ; " : X-X-8 : GOTO fc8 00 
" *STR*< Y+N > *" ; X2Z$ £ " t Y=Y-S: GOTO4B00 



:OHMS HORIZONTAL: OHMS VERTICAL : SI N E WAVEFORM* 

CLOSED BRACKET." 
YMB0L5 ARE DRAWN WITH THE C +).(-).(*) AN Df/> KEYS 




ARROWS ARE DRAWN WITH ARROW KEYS." 

TH WEST AND NORTH WEST ARROWS ARE 



411 IH 



5750 PRINT "NORTH. SO UTH • EAST 
5760 PRINT r PR I NT" NORTH EAST, 
N WITH THE SHIFT + ARROW KEYS 
5770 FOR D*l TO 10O0 

5780 N*-1NKEY*:1F N $<> "N " AND DO1000 THEN NEXT t IF N*<>"N"AND D-IOOO THEN GOTO 58 



TO SEE NEXT PAGE PRESS ( N ) . " 



5790 
5800 
5810 
5820 



5840 
5850 
5900 
5910 
HT OF 



POSITION FOR A BRIEF MOMENT" 



IF N*= "N"THEN CLS: GOTO 5810 
RETURN 

PR J NT*"THE g KEY DRAWS A SAWTOOTH 
PRINT; PRI NT"THE( , ) KEY DRAWS A RAMP WAVEFORM 
PRI NT" THE ( > } KEY DRAWS A TEST POINT BOX" 
PRINT: PRIMT"THE (;) KEY SHOWS THE CURSOR 
FOR D=l TO 10000 + NEXT I RETURN 
REM CLEAR LARGE SECTION OF DIAGRAM 

CLS: PRINT** LARGE SCALE WIPEOUT ROUTINE PRINT? PRINT"MOVE CURSOR TO TOP RIG 
,r ; PRINT" PORTION TO BE WIPED OUT, PRESS PRINT "THE DOWN ARROW KEY UNTIL LIN 
E": PR I NT"RE ACHES BOTTOM OF PORTION TO ";PRINT M BE WIPED OUT* THEN PRESS LEFT " 
5920 PRINT TAB (11) "ARROW KEY" 

5930 PRINT: PRINT" A TONE WILL SOUND WHEN THE CURSOR MOVE TIME HAS ELAPSED* 

THEN PRESS THE DOWN ARROW KEY" 
5940 FOR 0*1 TO SO 0 0 : N EXT : SCREEN1 . I 



5950 
5960 
5970 
5980 
5990 
6000 



N = G 

TIMER-OS GOTO 330 

IF PEEK(342)-223 THEN" N- H* 1 : Z-Y- N : GOTO 5980 ELSE 5990 
Y-Y+l: PSET{X> Y) : IF Y-191 THEN 330 
IF P£EK{ 343 i =223 THEN 6oqo ELSE 5970 
X-X-ltlF SGN ( Z ) * - 1 THEN Z-0 
6010 LINE( X+ 1 , Z)-(X>1.Y) . PRESET 
6020 IF PEEK(343)-255 THEN CL-02GOTQ33Q 
6O30 IF SGN(X)=-1 THEN 330 ELSE GOTO6000 
6050 REM PRINT DIAGRAM ROUTINE 

6060 CLS: PRlNT"REMOVE DATA TAPE AND REPLACE IT WITH Clrdrtw POSITIONED AT STARTO 
F SCREEN DUMP PROGRAM" : PRI NT : PRI NT" TO OBTAIN HARD COPY THE NEXT PROGRAM WILL 
BE LOADED FROM THE TAPE" 

6070 PRINTS PRINT" MAKE SURE YOU HAVE ALL DETAILS CORRECT AS THIS PROGRAM WILL BE 

DELETED" 

6080 PRINT: PRINT" TO CONTINUE PRESS <C) OR TO RETURN TO DRAW ROUTINE PRESS (R 

)" 

609O C*=INKEY*iIF C* = T, "THEN 6090 
6100 IF C*-"R"THEN RETURN 
6110 IF C*O w C"THEN 6090 

6120 IF C*-"C'*THEN CLS4 t PRI NT£ 1 28 . CHR* { 1 91 * *CHR* ( 191 ) "LOAD ING 
M"CHR*{ 191 > »CHR*< 19l)+CHR*< 191>s ; PRINT 5TRING*{ 32 + 191 ) ; J PRINT 
EASE WA1T"STR1NG* ( 11 , 191) i 
6130 CLOADM"CIRDRAW2": NEW 



SCREEN DUMP PROG R A 
STR I NG$ £ 11 , 191 ) tP PL 
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Write 






Pete Garrard forgets about programming and starts looking for stories 



RECENTLY I have been going through my 
collection of Isaac Asimov science fiction 
novels (again!), and the last two that f 
reread were The Gods Themselves and The 
Currents of Space, Perhaps a better des- 
cription of th ese two pa rt i cular books wou I d 
be science faction, as both take a plausible, 
or at least extremely well hypothesised, 
piece of scientific Knowledge and weave 
around it an exciting tale of interstellar 
and intergalactic skullduggery, with just 
a little bit of romance thrown in for good 
measure. 

It has often struck me thai the science 
fiction world) of adventure games is sadly 
lacking, although Infocom come to our 
rescue (as usual on mightier machines 
than the Dragon) with such gems as 
Planet fall and Stat i onfall, both featuring 
the truly wonderful robotic creation known 
as Floyd. Some posit ronic brains do ave 
em, although I can't see Floyd ever taking 
the lead role in The Phantom of the Opera 
somehow. 

The point linking those two paragraphs is 
this: why don't more adventure writers take 
their example from dear old Isaac's 
methods, and concoct an exciting adventure 
based in some way on scientific fact, or 
something that has repeatedly proposed as 
scientific fact. Remember, no-one has for 
certain found a black hole yet, no-one has 
for certain proved that quarks and gluons 
exist, but everybody tends to accept them 
as being essential to proving various 
theories. 

Thus we arrive at a paraphrasing of 
Infocom's usual term: Interactive Faction, 
adventures that start off with a sound 
basing in fact, or proposed fact, and which 
take those facts as the basis for an in- 
teresting, possibly humorous, certainly 
different, type of adventure game. 

With all the lofty eminence of a degree in 
astronomy f rom U ni vers ity Col I eg e Londo n 
(albeit from years ago ... ageing hippy, 
Helen, I know!), (Join the UGLold hats club.) 
I think it r s time to wander through and 
around one or two science fiction 'stories' 
that could easily be used as the basis for 
an adventure game, starting with some- 
thing very close to the plot behind the 
aforementioned Asimov classic The Gods 
Themselves. 

Bar, library 

In my first year at university we all had to 
write a report on any unusual" aspect of 
astronomy that interested us, and we all 
went scurrying to the library (well, to be 
honest, bar first, library later) in search of 
information and inspiration. It was there 
that I first read all about black holes, worm 
holes, and white holes. What? Virtually 
everyone has heard of black holes, but 
the others? They have been proposed 
in several different scientific journals, 



by a variety of different authors. The theory 
is simple. If we take the postulate that a 
black hole exists, then what happens to all 
that energy that's being sucked into the 
things? It can't just vanish, that would be 
breaking several laws of physics, and apart 
from anything else it would leave us with a 
universe that was gradually running out of 
energy. Entropy, and all that. 

So, the theory is that it all travels along a 
worm hole until it re-emerges via a white 
hole into another universe. However, if this 
is the case, then other universes must also 
have black holes which are sending 
energy to us via worm holes and white 
boles : in order to maintain stability. Why 

has nobody detected any white holes? 
Nobody has detected any black holes yet, 
although there is a strong case for one in 
the constellation of Cygnus, the Swan. A 
beautifully constructed theory that really 
explains nothing, but which opens up the 
path to other universes. 




Parallel universes, alternate universes, 
call them what you will, but an adventure 
that starts off with our explorer vanishing 
down a black hole and emerging into 
another universe, then desperately trying 
to get back to his own place and time, 
would be an interesting one. In an adven- 
ture like that, just think of the fun you could 
have dreaming up your other universe, 
where none of the laws of physics as we 
know them would necessarily apply. What 
might be an exceedingly heavy object in 
our universe might be very light tn another 
one, although it would still possess the 
same inertia. Well, possibly, anyway, you 
might want to change a little bit more than 
just the laws of gravity. 

I briefly looked at some of Carl Sagen's 
more outrageous writings on the subject of 
life on other planets, and in particular the 
planet Jupiter. No-one will be able to prove 



his theories right or wrong for many years, 
perhaps centuries, because Jupiter is a 
difficult place to explore to say the least, 
However, an adventurer could go there 
and meet all the strange, weird and 
wonderful animals that Sagen puts for- 
ward as possibly existing in the thick 
Jovian atmosphere. 

The tenth planet 

What I eventually concentrated on was the 
search for the tenth planet. Arthur C. 
Clarke, another superb science faction 
author, repeatedly makes mention of a 
tenth planet called Persephone, but what 
he intends it to be is uncertain, as it ap- 
pears to ha ve n o pu rpose ot he r t h a n d ating 
a story of his as some way off in the 
future after this tenth planet has been 
found. According to all the scientific 
papers I read, there is a stronger case for 
arguing that the Sun is part of a binary 
system, with its partner being way, way 
beyond the orbits of Pluto and Neptune. 
This star* is supposed to be visible in the 
infra-red, is supposed to have run out of 
steam long ago, and could explain some 
slight perturbations still to be found in the 
orbits of the outer planets. 

Send an adventurer there, that's what 
I say, and let him explore this companion 
star of our Sun, Perhaps it's not a part of 
nature at all, but some ancient artefact 
put there by explorers long ago. Not very 
scientifically plausible, but in the world 
of adventures anything goes. Nobody, 
incidentally, has yet proved that there isn't 
a not her sta r out t h ere i n som e sort of I i n ked 
orbit with our Sun: there's a stronger case 
for its existence than there is for its non- 
existence. This is the sort of situation 
where, once again, you could let your 
imagination run riot and create a whole 
new world for your adventurers to explore, 
If any of you have ever read Arthur C. 
Clarke's Rendezvous with Rama you'll 
know the sort of thing. Not only are you 
exploring an unknown world, but you 1 re 
also exploring one created by an unknown 
intelligence, one that has a completely 
different way of thinking to mankind . Thus 
you could set problems that require a 
different viewpoint from normal in order to 
be able to solve them. 

in my final year at university those of 
us who had survived the years of student 
life and overdrafts were required to write 
a ten thousand word report on a topic 
within the astronomical field. We were 
supposed to be serious students by now, 
and were not allowed such a free rein with 
our choice of subject matter. 

A caref ully prepared list was presented, 
and we chose from that. I selected a 
curious group of stars known as Wolf- 
Rayet stars (in honour of their discovers), 
which are way down at one end of the 
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cycle, but which for some 
peculiar reason are giving off far more 
energy than they should. Are they nearer 
than we thought and giving off normal 
amounts of energy, in which case the stan- 
dard way of esti mat i ng t h e d ista n ces to the 
stars is proved wrong, or are they really far 
away, in which case our theories of stellar 
evolution could do with a spot of revising. 
Are they artificial beacons in space, mann- 
ed by beings from other planets? A kind of 
super-duper Radio One* presumably not 
playing the same banal drivel that usually 
occupies our airwaves. Again, send an 
adventurer there and let him have an 
explore 

This brings us to the last thing I want to 
mention in this month's article; the ques- 
tion of I ife on oth er pla nets, T h re e p e o p I e i n 
the space of seven days have asked me for 
my views on this, and personally (and I 
stress, personally) I think that sheer 
numbers force me to admit that there must 
be life, if not intelligent life, elsewhere in our 
galaxy. Why haven't they visited us, you 
might ask. Well, we haven't visited them, 
have we, and we're supposed to be 
intelligent. 



When you look up on a clear night and 
see the two thousand or so stars that are 
visible to the naked eye. then when you 
look through a telescope or a powerful pair 
of binoculars and see the countless mil- 
lions more, who can doubt that there are 
planets orbiting just some of those stars? 
There are many stars in the same spectral 
class as our Sun, and presumably they 
have planets with oxygen-rich atmos- 
pheres like ours at a suitable orbit from 
them, so over the aeons during which our 
galaxy has existed I would doubt very 
much that life hasn't appeared somewhere 



Life everywhere 

In the world of science faction (to stick to 
the term) there seem to be two very dif- 
ferent schools of thought about how the 
universe might proceed. There is the 
Asimov view, which he sticks to in most of 
his later stories, that life started out on our 
planet and spread outwards through the 
stars, although he does veer from this in 
some of his earlier works. Not one in- 
telligent lifeform is found on any other 
planet in all those explorations, which 



seems a bit naive to me, even if it does give 
you the opportunity to weave some 
wonderful stories. 

Fa r more preva I ent is t h e vie w t h at I ife ex- 
ists all over the place I must confess that 
there are times when I find it hard to beiieve 
that intelligent life exists on this planet, 
never mind anywhere else! But, of course, 
it does. Do UFOs really exist, and if they do 
then does this indicate the presence of life 
elsewhere, coming in for a brief look at us 
before going away again? Why not an 
adventure from the other side of the coin, 
where your player is an alien being explor- 
ing earth? What would you do if your first 
sight of earth was a copy of The Sun 
newspaper and a radio playing some 
mindless zombie disco smash hit record? 
Turn round and go home? 

When you think about it , just one adven- 
ture, exploring just one star, and finding 
just one new race of intelligent beings, 
could be the start of something big. Look 
how long Star Trek has been a universal (!) 
favourite. Go for it. adventure writers, 
the libraries, and let's see some 
gent interactive faction appearing on our 



— 




I'll begin with a plea of help, which I pass on 
from P D Smith in Cardiff and Nick Hodge 
in Bridgewater. We'll be coming back to 
Nick later on, don't let him think he's going 
to escape this lightly. The game in which 
th ese nob I e c h a ps a re stu c k i s Return of the 
Ring, and on looking through the 
voluminous files that constitute the Ger- 
rard Answer To Everything we find that 
these files are sadly lacking as far as this 
particular game is concerned. Do we have 
a solution sheet? We do not. Do we have a 
hint sheet even? Alas, a hint sheet is 
nowhere to be found. 

Do we have the patience and time to sit 
down and try once again to play the bless- 
ed game? We do not, and so on behalf of 
messrs. Smith and Hodge, to say nothing 
of myself, can someone somewhere some- 
lime send me a solution? Oh, I just love 
alliteration. Anyway, a specific problem 
from Nick Hodge is that he wants to know 
what to do with the 'units', and also wants to 
know what he has to do in The Amplifier 
Room. Haven't a clue, old bean. 

Mr. Smith's problems extend even fur- 
ther, and since he puts them down in 



numerical order I might as well do the 

same, 

1) How do you get the key off the genie? 

2) How do you deal with the Trog 8 miles in- 
to the forest? . 

3) What use is the Village of the lost Krells? 

4) Where is the healer? I've been to the 
Temple of Regeneration but there is no- 
one there. 

As Mr. Smith points out, I have not 
answered any of these in previous issues. 
And if you're reading this, big brother Mike, 
he has a sneaky dig at you and says that 
you haven't either. No wonder you handed 
the column over ... 

So if anyone can help, muchos gracias, 
as we adventurers say. 

Before we get back to the plot, I shall tell 
you a little tale about Nick Hodge, taken 
directly from his letter, just to show you 
what adventuring can be like. And I quote: 
"After many a happy year playing arcade 
games, I decided to have a go at a few 
adventures (don't let the Expert hear about 
it though). (Don't worry, Nick, your secret 



is safe with me ) From that fateful day my 
life has changed dramatically. No longer is 
it just shooting aliens, but now EXAMINE 
CHEST OPEN CHEST and GET 
TREASURE has entered my vocabulary. A 
few weeks ago I was content with this, but 
the inevitable happened. I got stuck. Now 
it's BASH COMPUTER and HEADBUTT 
WALL so I write to you for HELP. It might 
help if I told you all of my problems, but I 
decided against that. I don't think the 
world's ready for my problems yet. But here 

are my adventuring ones:" 

End of quote Problems? You think 
you 've got problems? Have you ever tried 
to explain to a stone-cold sober policeman 
(while sitting in the front room of a friends' 
flat, said friends curled up in hysterics on 
the sofa}, why a drunken parakeet, sozzled 
on Scotch, is trying to make a nest in your 
beard? Just one of life's little problems 
that you must overcome before you can 
become a true adventure person. Strange- 
ly enough, I've never been back to that par- 
ticular house, I can't begin to think why ... 

Back to adventures, and how the old 
friends love to crop up In Trekboer, writes 
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Nick, how do you pick up the ice without 
it melting in your hand? teknalb ni ti 
yrrac. What's the use of the canteen? If. 
as I presume, you mean the beaker, then 
it's used for tenalp eht morf die a gniyrraa 
What's the use of the pillow? For no rekaeb 
eht gnippord. What's the use of the 
blanket? Sennit wef a eno taht derewsna 
ydaerlaev'l! 

In The Vortex Factor, after using the white 
cartridge, Nick finds himself in a dark 
place. This is not surprising, because dark 
it is indeed. Reasonably enough Nick 
wants to stop hitting his head and dying, he 
would rather like to stay alive. Well, I'm 
blowed if I'm writing all this lot out back- 
wards, so here goes- Presumably you've 
not made a candle, which can be done with 
the aid of some string, and the gruesome 
instruction me ft bird (into wax ball in torch 
flame), and you can them make and light 
your candle, If you haven't found the String 
and the wax bird, then keep trying! You 
know it makes sense What is the point of 
leaving all the treasures In the Curator's 
Office? Is there ever any logic behind the 
place chosen by the adventure writer to 
which all treasures must be returned? 
Rarely, if ever, so satisfy yourself with the 
knowledge that this is where the treasure's 
must go to if you are to get your 100 points 
and complete the game- 
In Return of the Ring ... oops ... skates 
over that one rapidly, until he reaches 
Tanglewood. How do you get the fishing 
rod off the gnome for the cat? You must 
send Goliath i nto the walled garden carry- 
ing the wand and cast spell to get the rod. 
You can then use it to fish for the specs and 
give them to Foghorn to wear. 

In Syzygy ... read last month's issue* I 
refuse to type all that again. 



Making money 

To take us onto something completely dif- 
ferent, we have a letter from one Clark 
Campbell, in Scotland. Anyone who finis- 
hes a letter with Yours adventuringly must 
be in with a sporting chance of getting 
mentioned in this column. I shall quote 
from his letter, because it brings us to a very 
interesting topic: making money! 

And I quote: "I have had a Dragon for 
over four years. Four years is a long time, 
though I did write (never did finish) a Gasic 
adventure; it had a simple parser — VERB 
NOUN type I had plans for this game: it 
wasn't your simple 'locations with a 
number of semi -logical problems' adven- 
ture game, but a massive role-play i n g cam - 
paign set in mystic and ancient world 
'where magic and monsters abound : com- 
parable to To Ike in at his best!" (TOLKIEN 
you son of a three-eared mewfipf He never 
reads this column ....) Now where have I 
heard that line before? I envisaged lots of 
adventures within adventures — sort of like 
Ring of Darkness — each adventure 
loading from cassette or disk. Why am I 
writing ali this? I need a little bit of help — 
could you advise me on anyone who needs 
a writer for adventure games; not the 
programming but the actual story line and 
problems." 



End of quote, back to me again. Clark 
raises something of great interest to any 
would-be adventure writer with this plea. 
Perhaps, to begin with, if anyone's in- 
terested in doing the programming for 
Clark's ideas then they could write to him at 
33 Shan d Street, Wis haw, Scotland ML2 
8HN, or indeed if any companies have any 
enthusiasm for the idea they might also 
wish to drop him a line. 



Novel situation 

G etthg an adventure game publi shed and 
marketed is not too far removed from get- 
ting a novel released. The situations are 
fairly comparable, and indeed playing a 
good adventure should be like reading a 
good novel . To take the similarity further, 
just as reputable publishing houses do not 
go around advert is i ng for novels to be sent 
to them, so reputable software houses are 
equally reticent in their own advertising 
Everyone welcomes receiving superb 
books/games, but if you've got any sort of 
renown then you don't go looking for them, 
people come to you. 

So I can't recommend any company to 
approach. You know the companies that 
are currently very big on the adventure 
front, and those are the ones to go for. 

Two or more heads are better than one, 
when it comes to writing an adventure. As 
enlightened readers will know, my brother 
and I have co-written adventures together, 
with him coming up with the storyline and 
scenarios and myself doing the actual pro- 
gramming . This worked well, in so far as it 
went. He is a better writer than wot I am, 
and I am a better prog rammer than WOT he 
is, so we complemented each other nicely. 

H owe ver, althou g h o u r eff o rts we re co m- 
mendable, and I like to think that we pro- 
duced some above average results, we 
never achieved earth-shattering great- 
ness, simply because neither of us had (or 
indeed has) the necessary time to spare in 
order to produce something truly brilliant. 
This is why, to get back to Clark's point I 
think it is better to submit a storyline to a 
company that you know from previous ef- 
forts are capable of producing the goods. 
As I'm currently going through the motions 
of doing just that myself, let's take a look at 
a typical example — me! 

Like a lot of people must do from time to 
time, I started writing a novel. This was 
given i n two chapter chunks to a friend for 
proof-reading, and after a while said friend 
(not the parakeet one!) suggested that it 
would make a good adventure game. My 
writing shiftedslightly toturn it intothe sort 
of plot that could easily be adapted to the 
adventure field, and then we both realised 
that it would make not just a 'good' but a 
superb adventure game. Writing on the 
novel stopped, writing on the adventure 
began. 

We have both had adventures publish- 
ed, but soon realised that this was one 
game where we were not going to be doing 
the programming. As a programmer, I 
knew what could and could not be done: 
this idea could be done, but not by us. As a 
of this, we sent a letter to a well- 



known software house, followed up by a 
'phone call, and they asked us to submit a 
detailed synopsis. Again, as a programmer 
I know the sort of thing that I would want to 
see, and so the mammoth task began. This 
is where I would imagine that so many 
good adventures do not get off the ground - 
I was once talking to Pete Austin of Level 9 
(he said, name dropping), who astonished 
me by say i n g that t h ey q u ite ofte n g et i d eas 
for adventures that run to many pages, all 
of them hand-written. It does not do your 
chances any good at all if you are forcing 
someone to wade through what might be 
very badly written script. Spelling mistakes 
and grammatical errors should also be 



Our adventure has, in the end, some 115 
locations. Each one of these has been 
typed up on a different sheet of paper (and 
printed out twice, I might add. as my spell- 
ing mistakes were removed and additions 
to the game were made by either myself or 
my friend), complete with short and long 
room description, objects that are initially 
located there, problems to be solved, and 
poss i ble i n pu ts by th e player a re also n oted 
down on these sheets. 

A separate section of our synopsis has 
each and every problem (together with the 
solution to that problem) printed out, cross- 
ref ere n ced back to the big p r i ntou tof all the 
locations. A third section has a list of ob- 
jects and their uses, again cross- 
referenced back to that big printout. A 
fourth section contains a detailed solution, 
a fifth contains the maps for the game, and 
finally we produced an introductory book- 
let outlining the characters used in the 
storyline and the background to the plot of 
the game. 



Impressive 

A mammoth task, which has taken quite 
some time to do, but the end result is an 
impressive document which (we hope!) 
will be looked at with far greater respect 
than a few tatty old sheets of A4 written in 
leaky biro. And how have we fared? I don't 
know, we're posting it three days after JVe 
finished this column (one last section to do 
each , and we're finished). Oh, the agonies 
of waiting. 

So, Mr. Campbell, and anyone else 
thin king of submitting an idea for an adven- 
ture to a large company, send a letter first of 
all with a brief outline, and if any interest is 
ex p ressed AT A L L an d t hey as k f or a d eta i I- 
ed synopsis, you know what you've got to 
do, And keep a copy of all documents, cor- 
respondence, etc etc. If you think your pro- 
gramming expertise is up to it, then by all 
means do everything yourselt However, it 
never does you any harm to admit that 
you're not capable of doing something. 
Both of us know that we could never pro- 
gram this game, but we do know that 
ft's a cracking adventure, and between 
the two of us we've come up with 
something which is more than twice as 
good as anything that either of us could do 
individually. 

So. all you non-programmers out there, 
get writing! See you next month . 
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PLAYING cards are the subject of this 
month's competition problem, plus a bit of 
magic with a computerised version of 
Chase the Ace. 

The effect of this trick as as follows: four 
cards are displayed on the screen, an ace 
and three face down cards. The ace can be 
switched with either of its neighbours by 
using the keyboard. A volunteer is then 
invited to repeat this switching operation 
as often as he wishes while your back is 
turned. When he has finished you specify 
a card at a certain position and instruct 
him to remove it from the display by press- 
ing an appropriate key. He is then asked 
to switch the ace one further time before 
you name the positions of two of the re- 
maining cards to be eliminated. The one 
card left displayed on screen is the ace, 
despite the fact that your back had been 
turned throughout the whole operation 



Gordon Lee plays his cards right 

land you would have no way of knowing the 
sequence of switches that were being 



When the listing shown is run the cards 
a re drawn on screen, To switch the position 
of the ace with one of its neighbouring 
cards press the key corresponding to the 
number below the face-down card to be 
moved. When the ace is at the end of the 
row it can be exchanged only with one 
other card, but when it is at one of the 
central positions there is a choice of two 
switches which can be made, After a key 
has been pressed the scrfeen display is 
updated and a tone sounds to indicate 
that another switch has been made. The 
method of switching the cards should be 
demonstrated to the volunteer. "Don't 
press a key until you hear the tone", you 
must say "or the computer won't be 



Now, turn your back to the compute rand 
let him switch the cards around as often as 
he wishes. When he indicates that he is 
f inished you tell him to eliminate one of the 
end cards by pressing either key L or R to 
denote th e left or the rig ht ha nd e nd . Yo u , of 
course, specify which of these cards is to 
be removed. Finally, ask him to make one 
m ore s w i t c h before spec i f y i n g a f u rt he r t wo 
cards to be eliminated. The remaining card 
proves to be the ace! 

The question is, how do you know which 
cards to name, as you have noway of know- 
ing the order in which the cards are being 
switched? The secret is in the tone which is 
sounded to indicate that the next key is to 
be pressed. After demonstrating to the 
volunteer how to switch cards, remember 
where the ace is before turning your back. 
It is not necessary to remember the actual 
position, only whether it is an odd or even 
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PAINT t lOO, 52> p Op Oi PAINT t "sMI r !) p U p Us f-AlMT C Itfrk, b2 r , <J t U 

L I ME i 1 00 P £5 > *- < 9£ » 75 fc ^ PEEGE T i L L Nt- 1 'dt ? TO! — i 1 04 r 73 * r F*ft£SE T * L I RJ 

E I 104, 75>- < 100, £5 J B PRESET 



I I20> 
I 130 
I J-W 

2000 
30IO 



2(W> 
20» 
3WO 
34>IO 

3O30 

3060 
3070 
3080 



PA TNT < 100,701,0,0 

■jET<36p36>-CiS4, -5f21 T & T <Jt«TiB6p36*-t I I4 t ?2> p A, 6 
mt TIJRN 

FOR C-L TO R STEP SOi Z * * A- 1 > *50+36 
IF C-Z THEN PUT tC,36)*tC+-2B B 92> B A r PSET 
IF C<>2 1 HE H FUTCC r 36J«iC+2a p 92*, 

MF.1CT 

HI1IJNU 200 1 4 
b b I I IhN 

A*=1NKEY*S IF A**" "THEN MOO 
IF A«H"L II C1R M- "FT" THEN 3050 
IF A* 1 ' 11 1 "OR A«> M 4*1HEN 2000 

V=VAL4A*F-IF AflSiV-AJal AND V . J THEN 3040 ELBE 3000 
A-V L LiU TU 30flO 

IF A*- H L 11 THEN Sl-Li L=L*SOi J-l ELSE K-Ri R-R-50 a J-4 



LlWEs:jS-£p30 
IF L-R THEN 
*£TUPN 



-<**34< I34>J f PRESET 4 BF 
PLAY " OIL 1 fit DE F Q AB AGFE IX- " 



Prize 

SHU FFLING towards a reply to Gordon's 
cutting question could turn up another 
lucky card — a discount card, or even a 
copy of Pyradventura or Underbeings 
of Croth from Drag onf ire Services, 
whose quest for the ultimate program 
under a fiver continues unabated. The 
pick of their list can be yours if you can 
find the card marked X . . . 

Rules 

When you have foFlowed the clues to the 
spot marked X and dug up a solution, 
bury it again deep within an envelope 
marked APRIL COMPETITION (what 
d'you mean, which year??) along with a 
printout and any comments you wish to 
append, and send it off to us at the usual 
place. Don't forget to include your name 
and address, preferably not hidden in the 
program listings! 

Now for the tiebreaker: literature time! 
{Actually, the mind of mathematician 
Lewis Carol was more cunningly con- 
voluted, if lis possible, than even that of 
Gordon Lee.) 1 Why is everyone running 



around like headless chickens in a barn- 
storm?" asked Alice, surveying the Dragon 
User office. What was the Red Queen's 
reply? 

January winners 

Close, this. Lots of entries, no wrong 
answers, lots of nice neat programs, 
tiebreakers high and low . . . after much 
sweat , the winners are: Don Robertson of 
Epsom, Pauf Priest I and of Lech lade (who 
won the Crossword as well, jam my feifow), 
Paul Weedon of Wotton-under-edge (get a 
new ribbon, Paul, please??), Eric Ha stead 
of Erith f Austan Henderson of Bronv 
sgrove. The First five all get the adventure 
Larkspur Waldorf is Trapped, kindfy sup- 
plied by John and Helen Penn and the 
author John Smallwood. The rest to get 
discount vouchers from the Penns: John 
Mac kin of Troon, Rochard Long of 
Camberiey, Keith David of Crawley, Phil 
Sapiro of Liverpool, S A Siddiqui of 
Chiswick, E A Newman of Addlestone, F J 
Taylor of Acklam, Les Simpson of Little- 
port, Denis O'Mulloy of Comberton, 
R Hemes of Milton Keynes, D J Gray of 
Cleveland, Ian Muggins of Caerphilly, 



and Alan Thomas of Siaplehurst. L W 
Turner is out of the top twenty, but 
requested a special mention "just to 
show my famify that I'm not past it", and 
him only 17, too. 

In answer to somebody's question, 
anyone can be excused the tiebreaker, 
but in the event of a tie, they won't have a 
tiebreaker, wil! they? We aren't looking for 
genius, just evidence that you can still 
think in English after a hard week's pro- 
gramming. And someone has to make 
the editor laugh once a month. 

This month's best tiebreaker from 
Keith David: "No L, No L, No L, No L, Is 
there somebody out there with a 
keyboard to sell? 1 ' No prizes for guessing 
which carol that's based on . 



»■ ■ 



Solution 

This months solution is opposite. 

Footnote 

Apologies to those who have not received 
Ohuckte Egg/Screaming Abdabs. Com- 
pute pea re moving house at the moment, 
and douhtfess all will be restored when 
they have a new roof over their heads. 



numbered card. Now, each time that the 
tone sounds the ace will change from an 
even to an odd position or vice versa. So, as 
the switches are being made simply count 
l odd, even, odd, even ..! and so on. When 
this is done you will not know the absolute 
position of the card, but you will know if it is 
in an odd or an even numbered position. Of 
it is odd then you can safely instruct that 
key R can be pressed to remove the right 
hand card. Similarly, if the ace ends up as 
'even', then the left hand card should be 
named. When you ask for one final switch 
to be made* this places the ace in the cen- 
tral position of the three remaining cards, 
so, after a great show of concentration, 
eliminate the left and then the right hand 
cards, the ace will be left behind, and the 
trick can be brought successfully to its 
conclusion. 

For a more subtle presentation of the 
trick the sound instruction can be removed 
from the program listing, but if this is done 
you must be sure of being able to hear the 
actual keys as they are being pressed. 

Competition 

Shown here are six cards taken from a 
standard pack. They have been dealt as 
shown and one of the cards has been 
turned face up. Can you determine the 
values of each of the cards from the fol- 
lowing information (Ace - 1, Jack = 11, 
Queen = 12 and King = 13): 

The sum of the two cards to the right of the 
queen is equal to the sum of the two cards 
to the left of the queen. 

The queen plus the two cards either side of 
her sum to the same total as card X plus its 
two neighbours. 






X 



mm * * ft ft 

* M m Jk * ..ft ■ 



Mr 




■mm 

■cnSM 




1 «£1 




The total value of all six cards is 52 (the 
number of cards in a pack). 

There is one pair of cards of equal value 
(which may or may not include the queen) 
— and one pair only. 

There ts a 9 among the cards but it is not 



the card one place clockwise from X. 

If I were to tell you the value of card X you 
would be able to determine the values of 
each of the cards! 



•i r p * i r ■ ■ i 



but can you do it without this 
information? 



The Answer 



This is Gordon Lee's own 
solution to the January competition 
see page 22 for results . 



ANSWER: A=2697 (A2=7273809) and 
B = 1489 (62=2217121) 

SOLUTION: The two values for A and B 
m ust bot h be i n t he ran g e of 1 000 to 31 62 a 5 
they both have seven digit squares. If both 
values were generated independently, 
there would be over four and a half million 
permutations possible, so much un- 
necessary work is eliminated by first selec- 
ting only those values possible for 'A 1 
before considering 'B r at all. For example, 
we know that the last digit of A must 



interlock with the first digit of A squared. 
Also, A squared must have a 7 as its third 
digit, and an 8 as rts fifth. 

In the listing variable 81 is the square 
of A, and the string variables S1$ and 
A$ are their string equivalents- Because 
of the 'ghost' character placed by the 
Dragon at the front of any string variable 
created by the STR$ command, the se- 
cond instruction in lines 110 and 130 
remove this. 

This makes the programming much 
more logical as the first character in the 



string is now the first digit in the number, 
and so on. 

Lines 140 to 160 test each string to check 
that interlocking digits correspond, and 
only once a possible value for A has been 
found does the program check for any 'B' 
values. This is done in the same way as 
with the A' variables, except that S 2 and 
S2$ are the corresponding variables 
holding the value of B squared. 

Only when all eight interlocking digits 
pass the test is the result printed out at line 
260 



10O FOR A-IOOO TQ 3162 

HO A««STR*(A) i A**MID*<A* P 2> 

120 £l=A*A 

130 Sl*=STR*CSl)iSl*=MID*<Sl* f 2> 

140 IF MID*CA* f 4 f t )<>MID»<Sl* f l r 1) THEN 280 

150 IF MXDtCSlt, 3, J ><> M 7" THEN 280 

160 IF MID*CSl* t 5 f 1)<> H 8" THEN 2BO 

170 FOR B-IOOO TO 3162 

180 B^STRttBHBf-MID*^*^) 

190 IF HlD*CB* t 4,i)<>MIB*CSl* t 7 f !> THEN 270 



200 S2=B*B 

210 S2*~STR*<S2>iS2*=ttlD*(S2*, 2> 

220 IF MID*CB», 1, 1 )<>HID*CS2* t 7 t 1 > THEN 270 

230 IF MID*(A* t l t l><>MlD*<S2* F 1 , 15 THEN 270 

240 IF HIDi(S2* t 3 r UOU" THEN 270 

250 IF ttlD*(S2$,5 t l)<> ,, l" THEN 270 

260 PRINT A* f " M fSl*i" "*B*p" " | S2* 

270 NEXT B 

280 NEXT A 
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Dragon Answers 



Build-a- 
drive 



I am contemplating building my own 
disc drive interface and would like 
the following information; 

1. What disc drive controller chips 
are used in the commercially avail- 
able cartridge? 

2. Where, in memory, are the con- 
troller's registers mapped? 

3. Do dis-assemolies of any DOS ex- 
ist and if so P where can I obtain one? 

P M Buckley 
72b High Street 
Whitton 
Twickenham 



THE floppy disc controller chip us- 
ed in the Dragondos cartridge is 
the 'WD 2797'. Its registers are 
mapped from SFF4K to SFF43 as 
follows; 

$FF4D Command Register 
SFF41 Track Register 
SFF42 Sector Register 

SFF43 Data Register 

The disc motor control latch is 
mapped at address $FF48. This 
controls the disc motors for all four 



To my knowledge, there are no 
commercially available listings of 
any of Hie Dragon DOSs. In any 
event, these would of course be 
copyrighted. You will need a lot of 
in depth knowledge of both the 
Dragon and Disc Interfacing to 
design your own cartridge — it 
took Dragon Data six months to get 
Dragondos finally working cor- 



RAM card 
running 

I read with interest the letter from 
Phil Callaghan (Jan 33) headed 
ROM can't be RAM. I have in fact 
been running such a RAM card, 
which I designed, for the past 16 
months on my Dragon. 

The reason why I have not produc- 
ed the card commercially is the 
possible lack of sales of such an 
ite m . The fu II CART area c an be u sed 
{less 256 bytes 10 functions}. The 
cost of the card, to fit into an old 
Dragon Data cartridge housing, 
would be approximately £27 for an 
8K RAM and £34 for 16K. 

My card has a "write protect 
switch' which can produce ROM on- 
ly functioning after the program 




If you " ve got a technical q uestion write to Brian Cadge. 
Please do not send a S A E as Brian cannot guarantee to 

answer individual inquiries. 



know, no commercial software has 
ever used the command as the for- 
mat is so complicated that Hie 
source computer (connected to the 
RS232 port) could not easily prod- 
uce the data in the required format. 

The command Is really just a 
'dinosaur' from earlier versions of 
Microsoft's 6809 Basic 



has been fully assembled. This is 
useful fo r testi n g you r prog r a m if it is 
to be finally blown on to an Eprom. 

I would appreciate your readers' 
remarks on such a card. 



13 Primrose Lane 



West Yorkshire 
LS11 5EW 

I am still getting quite a few letters 

about RAM cartridges. It you are 
interested in this particular design 
then lake the trouble to contact 
Tom at the address given. 



Screens 
resolved 

I have tried to write a program which 
shifts to the low resolution screen, 
after using Stylograph and OS-9. 
The program: listed below crashes 
when using OS-9, but not with nor- 
mal Basic. Where are the low resolu- 
tion screens stored in OS-9? 

pshs a,b,x 
Idx # $ffc8 
sta 4,x 
sta 2,x 
sta 1,x 
sta-2<x 
sta ~4,x 
sta-6,x 
sta -S,x 
Ida $ff22 
anda H $07 
sta $ff22 
puis a,b,x,pc 

Geir Hovland 
Legdavegen 



THE 
the 
Irom a 



Norway 

you are using tells 
to display the screen 



it does not tell the software thai Ihe 
screen has moved. Under Basic, 
the low res (text) screen starts at 
address 1024 and is 512 bytes 
long. Under OS-9, the screen starts 
at address 39424. When you run 
the 'G051' command, this loads a 
different driver for the KBVDIO 
module which uses the high 
resolution screen. This starts at 
address 39424, but uses up 6144 
bytes ratherthan 512. Unfortunate 
ly, there is no '0032' commands 
supplied with OS-9 and II It no sim- 
ple task to re-load the low resolu- 
tion screen driver. The simple 
answer is lo power off and on to 
release the extra memory 
return to the low res screen. 



DLOAD 

what? 



WHILE peeking through the Basic 
ROM I came across the list of com- 
mands and functions. Amongst 
these was one calJed "DLtiAD: This 
is not in my manual, can you tell me 
what is is supposed to do? All I get is 
?I0 ERROR. 



Banbury 

THE DLOAD (and DLOADM) com- 
mand is the serial port equivalent 
of the CLOAD (and CLOADM) com- 
mand. The code was partly written 
in the Dragon 32 ROM, but then 
abandoned and the command 
simply causes an IO Error, 

The Dragon 64 has a built-in 
RS232 port and so the code is com- 
plete in the '94 ROM (it uses chan- 
nel -3 which is the internal HS232 
port channel). The format of the 
data expected t o come in at the 
port is the same as the format for 
cassette data (which is loo com- 
plex to go into here). As far as I 



Where is my 
32K? 

JUST recently I have had my Dragon 
32 upgraded to 64K but now I need 
to know how to access the extra 
32K. All that appears on the screen 
when the computer is switched on 
and I ty pe ?MEM is 24871. 

I have also just recently pure has* 
ed a Cumana single disc drive with 
Dragondos/Superdos E5. I would 
like to know how to use the system to 
the full so could you tell me what 
sort of disc I need. Am I right in 
thinking that I need a Dragondos 
disc and , if so. do you know where I 
can get hold of one? 

G J Wa&tiiQve 
47 Buckshaw Halt Close 
Astiey Village 
Chorley 
Lanes 
PR7 fSX 

UNLESS you have a Dragon 64 it 
not possible to access the extra 
32 K RAM from Basic as Basic itself 
sits in ROM which overlays the ex- 
tra RAM. Willi a K typing EXEC 
immediately after power up will 
copy and switch out the ROM chip. 
It is very unlikely thai your upgrade 
included upgrading the Basic 
ROMs as well. 

However, If you have a disc inter- 
face plugged in then it is not possi- 
ble to access this extra RAM (even 
on a Dragon 64) as the disc ROM 
also overlays the extended RAM 
and has no built-in provisions for 
copying itself lo RAM. 

The extra RAM may boused by (a 
few) commercial programs (eg ad- 
enture games, word processors 
etc), but to access it yourself you'll 
need to resort to machine code. 

The type of disc you need for 
your drive is any 5.25in double 
density disc. Don't worry about it 
being single or double sided on the 
label — only one side will be used 
anyway. You'll need to use the 
D SKIN IT command to format the 
disc before using It. If you want to 
use someone else's disc then this 
must also have been formatted as a 
Dragondos disc. 
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